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

¤£¦PÀÉ®×SHEET½Æ»s

¤£¦PÀÉ®×SHEET½Æ»s

½Ð°Ý¦U¦ì¤j¤j
¤G­Ó¤£¦PÀɮתºSHEET  ¦p­n¤º®e­ì«Ê¤£°Êªº½Æ»s!
°£¤F³æ¿WÀx¦s®æ¤º®e½Æ»s¥~!¦³¨ä¥¦¤èªk±N¾ã­ÓSHEETÀx¦s®æ¤º®e½Æ»s¶Ü??
§Ú¥Î½Æ»s«ü¥O¤£¯à±NÀx¦s®æ¤ºªº¤½¦¡½Æ»s?

ÁÂÁ«ü¾É

·P®¦

¥»©«³Ì«á¥Ñ register313 ©ó 2012-6-19 14:27 ½s¿è

¦^´_ 1# mead

¤@¯ë°Ï
¦p¹Ï(ª½±µ©ì¦²=>·h²¾¤u§@ªí , «ö¦íCtrl+©ì¦²=>½Æ»s¤u§@ªí )
1.gif

VBA
±N¬¡­¶Ã¯Book1¤u§@ªíA  ½Æ»s¨ì  ¬¡­¶Ã¯Book2ªº³Ì«e­±
¬¡­¶Ã¯Book1,¬¡­¶Ã¯Book2§¡¶·¶}±Ò
¤@¯ë¼Ò²Õµ{¦¡½X©ñ¦b¬¡­¶Ã¯Book1©Î¬¡­¶Ã¯Book2§¡¥i
  1. Sub XX()
  2. Workbooks("Book1.xls").Sheets("A").Copy Before:=Workbooks("Book2.xls").Sheets(1)
  3. End Sub
½Æ»s¥N½X

TOP

¦^´_  mead

¤@¯ë°Ï
¦p¹Ï(ª½±µ©ì¦²=>·h²¾¤u§@ªí , «ö¦íCtrl+©ì¦²=>½Æ»s¤u§@ªí )


VBA
±N¬¡­¶Ã¯Boo ...
register313 µoªí©ó 2012-6-19 13:56


¸Õ¹L  ·|¤F
·PÁÂregister313¤j¤j¼ö¤ß«ü¾É!
¸Ñ¤F§Úªº§xÂZ

·P®¦

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD