kimbal

¦^´_ 2# 317

³o¬q¥N½X©ñ¦b¤u§@ªí1ªº¥N½X¤º

1. Private Sub CommandButton1_Click()
   
2.         ActiveSheet.Unprotect
   
3.         Selection.Locked = True
   
4.         ActiveSheet.Protect
   
5. End Sub
   
6. 
   
7. Private Sub CommandButton2_Click()
   
8.         ActiveSheet.Unprotect
   
9.         Selection.Locked = False
   
10.         ActiveSheet.Protect
    
11. End Sub

½Æ»s¥N½X

¥Îªk:    ¥ý§â¤u§@­¶«OÅ@,©Î«ö¤@¤U 1
©Ò¦³®æ¤l¹w³]¬OÂꦺªº, «ö¤U2¥i¥H¸ÑÂê