ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

Ãö©ó¥¨¶°Âà¶K°ÝÃD!¤º®e¦p¤U..

¦^´_ 1# ¤ÑÅ]¶Â¦Ð
°õ¦æ¨ÃµL°ÝÃD
¥i¯à¬O§A¦bvbe¤¤°õ¦æ
¦ýÁ`ªí¦¨¬°§@¥Î¤¤¤u§@ªí©Ò³y¦¨
«ü©ú¤u§@ªí¸Õ¸Õ
  1. Sub °õ¦æ()
  2. With Sheets("Á`ªí")
  3.     .Unprotect "0000"
  4.      Sheets("key").Range("A2:C5").Copy .[A2]
  5.     .Protect "0000"
  6. End With
  7. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¦a¤WºØ¤Fµæ¡A´N¤£©öªø¯ó¡F¤ß¤¤¦³µ½¡A´N¤£©ö¥Í´c¡C
ªð¦^¦Cªí ¤W¤@¥DÃD