- ©«¤l
- 33
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 74
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-6-9
- ³Ì«áµn¿ý
- 2024-7-8
|
Excel Ū¨ú Word ªí®æ°ÝÃD
½Ð°Ý§Ú¦³¤@Ówordªí®æ»ÝŪ¨ú¨ìexcel¸Ì±¡A
ªí®æ¦p¤U¡G
¥H¤U¬°µ{¦¡½X¡G- With WDapp.Documents(file1).Tables(1)
- For r = 2 To .Rows.Count
- For c = 1 To .Columns.Count
- Cells(r, c) = .Cell(r, c)
- Next c
- Next r
- End With
½Æ»s¥N½X §ì¨ì¼ÐÃD 111 222 333 ¥H«á´N·|¥X°ÝÃD¡A½Ð°Ý¦X¨ÖÀx¦s®æªº°ÝÃDn¦p¦ó³B²z? |
|