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

[µo°Ý] Range.Copy Destination:=Range³ø¿ù

[µo°Ý] Range.Copy Destination:=Range³ø¿ù

½Ð±Ð¦U¦ì¤j¤j¡Acode ¦p¤U¡A°õ¦æ«á¦sÀÉÃö³¬Excel·|³ø¿ù ¡§¹Ï¤ù¤Ó¤j¡A¶W¥Xªº³¡¤À±N³QºI¥h¡C¡¨
¤u§@ªí¤¤¨S¦³¹Ï¤ù¡C½Ð°Ý­þùئ³°ÝÃD¡H

ÁÙ¦³½Ð°Ý¦p¦ó¼gcode¥i¥H¦³®Ä²vªº copy ¤j¶q¸ê®Æ¡A§Ú¥Î Range("B11:BG30010").Value = Sheets("Sheet1").Range("A1:BF30000").Value «ÜºC¡C
µ¥¯Å¦³­­¤£¯à¤W¶Ç¶W¹L1MBªþ¥ó¡A¥u¦n¤À3³¡¤À¡C
data copy - sonny1 - Copy.part1.rar (921.6 KB) data copy - sonny1 - Copy.part2.rar (921.6 KB) data copy - sonny1 - Copy.part3.rar (351.83 KB)
  1. Private Sub Worksheet_Activate()
  2.     Cells.ClearContents
  3.     Sheets("Sheet3").UsedRange.Copy Destination:=Range("B11")
  4. End Sub
½Æ»s¥N½X
sonny-e.gif
ss

¦^´_ 3# kimbal

·PÁ¤j¤j¡A°ÝÃD¤w¸Ñ¨M¡C
ss

TOP

        ÀR«ä¦Û¦b : §g¤l¥ß«í§Ó¡A¤p¤H«í¥ß§Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD