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

¦p¦ó±N¿ï¨úªºÄæ¦ì¦Ü¤£¦PÀɮתº³Ì«á¤@¦C

¦^´_ 1# xlarge16803


    ¥¼¶}±Òbbb.xlsª½±µcopyªº¼gªk
  1. Sub test()
  2. Workbooks("aaa.xls").Sheets("sheet1").Range("a1:e1").Copy
  3. Workbooks.Open ("d:\bbb.xls")
  4. Workbooks("bbb.xls").Sheets("sheet1").Range("a65536").End(3).Offset(1, 0).Select
  5. ActiveSheet.Paste
  6. End Sub
½Æ»s¥N½X
¦bbbb¦³¶}±Òªº±¡§Î¤Uªº¼gªk
  1. Sub test2()
  2. Workbooks("aaa.xls").Sheets("sheet1").Range("a1:e1").Copy
  3. Workbooks("bbb.xls").Activate
  4. Workbooks("bbb.xls").Sheets("sheet1").Range("a65536").End(3).Offset(1, 0).Select
  5. ActiveSheet.Paste
  6. End Sub
½Æ»s¥N½X
¸ô®|½Ð¦Û¦æ­×§ï

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡µLªk¾B¾×¡j©È®É¶¡®ø³u¡Aªá¤F³\¦h¤ß¦å¡A·QºÉ¦U¦¡¤èªk­n¾B¾×®É¶¡¡Aµ²ªG¬O¡G®ö¶O¤F§ó¦h®É¶¡¡A¥B¤@µL©Ò¦¨¡I
ªð¦^¦Cªí ¤W¤@¥DÃD