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

Excel Ū¨ú Word ªí®æ°ÝÃD

Excel Ū¨ú Word ªí®æ°ÝÃD

½Ð°Ý§Ú¦³¤@­Ówordªí®æ»ÝŪ¨ú¨ìexcel¸Ì­±¡A
ªí®æ¦p¤U¡G


¥H¤U¬°µ{¦¡½X¡G
  1. With WDapp.Documents(file1).Tables(1)
  2.     For r = 2 To .Rows.Count
  3.         For c = 1 To .Columns.Count
  4.             Cells(r, c) = .Cell(r, c)
  5.         Next c
  6.     Next r
  7. End With
½Æ»s¥N½X
§ì¨ì¼ÐÃD 111 222 333 ¥H«á´N·|¥X°ÝÃD¡A½Ð°Ý¦X¨ÖÀx¦s®æªº°ÝÃD­n¦p¦ó³B²z?

¦^´_ 2# n7822123


    ·PÁ¡Aµ{¦¡¥i¥Î¡A®æ¤l³¡¤À§Ú¦b·Q¿ìªk..

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡¦pÆp¥Û¡j®É¶¡¹ï¤@­Ó¦³´¼¼zªº¤H¦Ó¨¥¡A´N¦pÆp¥Û¯ë¬Ã¶Q¡F¦ý¹ï·M¤H¨Ó»¡¡A«o¹³¬O¤@§âªd¤g¡A¤@ÂI»ù­È¤]¨S¦³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD