[µo°Ý] ¦³Ãö»yªkµLªk°õ¦æªº°ÝÃD¡I

skyutm

½×¾Âªº¦U¦ì¥ý¶i¤j®a¦n¡I«Ü©êºp¤S¨Ó¥´ÂZ¤F¡A¦]¬°¤p§Ìªº¦¨ÁZ¨t²Î¤w§¹¦¨«Ü¤[¤F¡A©Ò¥H¦³¤@¬q®É¶¡³£¨S¨Ó¡C²{¦b¤S¥X²{°ÝÃD¡A©Ò¥H·Q¨Ó½Ð±Ð¡I
¤U­±ªº»yªk¡A¬O­n¨Ó¶}©ñ¥¼Âê©wªºÀx¦s®æ¡A¥i¥H§ïÅÜÀx¦s®æªº¦r«¬µ¥µ¥ªº¿ï¶µ¡A¦ý¬OÂ÷¶}³o­Ó¤u§@ªí¤S¦^¨Ó«á¡A­ì¨Óªº³]©w¤SÅܤF¡AÅܦ¨¥¼Âê©wªºÀx¦s®æ¤SµLªk§ïÅܮ榡¤º®e¡A¤£ª¾°ÝÃD¥X¦b­þ¸Ì¡H    ¬O¦bªþ¥óÀɮתº¡u¦¨ÁZ³æ¡v¤u§@ªí
    '«OÅ@¡u¦¨ÁZ³æ¡vªí®æ¡õ'
    With Sheets("¦¨ÁZ³æ")
    .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingCells:=True
    .EnableSelection = xlUnlockedCells
    .Protect Password:="6323"
    End With
    '«OÅ@¡u¦¨ÁZ³æ¡vªí®æ¡ô'

skyutm

·s¸ô¦¨ÁZ¨t²Î.rar (412.44 KB)

¤U¸ü¦¸¼Æ: 6

2013-1-6 00:56

¦^´_ 1# skyutm
ªþ¥óÀÉ

Hsieh

¦^´_ 2# skyutm

       ActiveSheet.Protect Password:="6323", DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True
    ActiveSheet.EnableSelection = xlUnlockedCells

skyutm

¦^´_ 3# Hsieh
¦A¦¸·PÁ¶W¯Åª©¤jÀ°¦£¸Ñ´b¡A¤p§Ì¤w´ú¸ÕµL»~¡C
¤£¹LÁÙ¬O·Q¦A½Ð±Ð¡A¦]¬°³o­Ó»yªk§Ú¬O±q¿ý»s¥¨¶°±oª¾ªº¡A«á¨Ó§Ú¤ñ¸ûª©¥D©M§Úªº»yªk¡Aµo²{¤Ö¤FAllowFormattingColumns:=True, AllowFormattingRows:=True³o¨â¦æ¡A¬O³o¼Ëªº¦]¯À¶Ü¡H

Hsieh

¦^´_ 4# skyutm

À³¬O§A¹ï«OÅ@¤u§@ªí¥\¯à¤¤¡A¤¹³\¨Ï¥ÎªÌ½s¿èªº¥\¯à»{ÃÑ¿ù»~
¾É­P¿ý»s¥¨¶°®É¨Ã¥¼¤Ä¿ï¤¹³\³]©w®æ¦¡ªº±ø¥ó©Ò­P

¤U¸ü (25.12 KB)

2013-1-7 00:22

³o´N¬O§Ú­Ì¤@ª½±j½Õ­n¥ý»{ÃÑEXCEL°ò¥»¥\¯à¡B¾Þ§@³o¼Ë¤~¯à¿ý»s±o¨ì¥¿½Tªºµ{¦¡½X

skyutm

¦^´_ 5# Hsieh
¤Ñ§r¡I¯uªº¤£¬O§Ú­n©ç°¨§¾¡Aª©¤j¯u¬O¤@»yÅå¿ô¹Ú¤¤¤H¡A§Ú´N¬O¥u¤Ä¤¹³\Àx¦s®æ¡A§Ú¤@ª½¥H¬°¥u­n¤Ä¨º¤@Äæ´N¦n¤F¡C