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

[Âà¶K] VBAªº¼g§@§Þ¥©»P¼W¶i®Ä¯à

¦^´_ 93# wjt9093
Àx¦s®æ½d³ò«D³sÄòÀx¦s®æ¡A¥²¶·¤À¶}¼g¤J
Sheets(a1).Range("A4:A36") = Sheets(a2).Range("B5:B37")
Sheets(a1).Range("B4:B36") = Sheets(a2).Range("E5:E37")
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 94# Hsieh
·PÁ±zªº«ü¾É,¤£¹Lµo²{°õ¦æ«á¤´¦³°ÝÃD,³Ì«á¸Õ«Ü¤[,¶·¥[.value¤~¦¨¥\!¦A¦¸·PÁ±z,Åýµ{¦¡§óºë²!
Sheets(a1).Range("A4:A36").Value = Sheets(a2).Range("B5:B37").Value
Sheets(a1).Range("B4:B36").Value = Sheets(a2).Range("E5:E37").Value

TOP

¦^´_ 1# Hsieh


­è¶i¤J EXCEL VBA ¥@¬É   
¬Ý¨ì³o½g¤å³¹
¦hÁ¤À¨É~~

TOP

¦^´_ 1# Hsieh


    ¬Ý§¹¾ã­Óı±o¡u¶WÆg¡v¹ï©ó·s¤â¨Ó»¡«Ü¹ê¥Î!!!!!!!

TOP

¶â, ¤S¾Ç¨ì¤@¨ÇªF¦è
¬Ý¤F¦Û¤v¼gªº, ÁÙ­n¦h¦h§ï¶i

TOP

¤@¶}©l¾Ç²ßªº®É­Ô§¹¥þ¤£·|ÅU¼{¨ì³B²z®É¶¡,¶]¥X¨Ó´NÁ¤ÑÁ¦a¤F
¦ý¬O¶V¾Ç¨ì«á­±,³B²zªº¸ê®Æ¶V¨Ó¶V¦h®É,¤~µo²{¯à¬Ù«h¬Ùªº­«­n©Ê
·PÁ¤j¤j¤À¨ÉÀu¨}Æ[©À^^

TOP

¥Î¤ß¬Ý§¹ ·PÁªO¥D
­È±o¦n¦n¦a¾Ç²ß

TOP

¦^´_ 1# Hsieh

ª©¥D~½Ð°Ý¥H¤U¨â¬qµ{¦¡½X,ªºdoc¬O«üword¶Ü?
¨ºapp¬O«ü·í«eµ{¦¡½X¶Ü?
Set wrdDoc = Nothing 'ÄÀ©ñª«¥óÅܼÆ
Set wrdApp = Nothing

TOP

¦¹½g«D±`¹ê¥Î~

TOP

ª©¥D,§Ú¬O¤@¦W·s¤â¾ÇVBA ªº¤H,
§Ú·Q°Ý¦³¦n¦h®É¼gµ{¦¡³£·|¥Î¨ì"APPLICATION.XXXXXX" ¨ä¹ê¦b¤°»ò®É­Ô¤~·|¥Î¨ì"APPLICATION"©O?
½Ð½ç±Ð

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD