GBKEE

¦^´_ 1# ¤ÑÅ]¶Â¦Ð
§Aªº¿ù»~¬O¦]¬°¥ýcopy µM«á¸Ñ°£«OÅ@®É,¨t²ÎµLªk«O¦scopyªº¸ê®Æ¦Ó²£¥Íªº.
¥i°Ñ¦ÒHsiehª©¥Dªºµ{¦¡ ¨Ó°õ¦æ
¤U­±µ{¦¡½X¬O°w¹ï §A­ì¨Óµ{§Ç¨Ó­×§ï

1. Sub °õ¦æ()
   
2.     'Rows("2:5").Select
   
3.     'Selection.Copy
   
4.     Sheets("Á`ªí").Select
   
5.     With ActiveSheet
   
6.         .Unprotect "0000"
   
7.         Sheets("key").Rows("2:5").Copy
   
8.         .Rows("2:2").Select
   
9.        ' ActiveSheet.Paste
   
10.         .Paste
    
11.         .Protect "0000"
    
12.     End With
    
13.     Sheets("key").Select
    
14. End Sub

½Æ»s¥N½X

GBKEE

¦^´_ 4# ¤ÑÅ]¶Â¦Ð
¶Ç¤W§AªºÀɮ׬ݬÝ