- ©«¤l
- 125
- ¥DÃD
- 33
- ºëµØ
- 0
- ¿n¤À
- 223
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- Excel 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_¥«
- µù¥U®É¶¡
- 2010-9-6
- ³Ì«áµn¿ý
- 2024-6-8
|
¥»©«³Ì«á¥Ñ 7777 ©ó 2017-10-2 19:58 ½s¿è
ª½±µ¥Îexcel¥h¶}±Ò¤å¦rÀÉ
¶}±Ò«á´N·|¦³¸ê®ÆåªR£x¿ï¾Ü¶±¥X²{¤F
Sub Macro1()
Workbooks.OpenText Filename:="C:·s¼W¤å¦r¤å¥ó.txt" _
, Origin:=950, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1)), _
TrailingMinusNumbers:=True
End Sub
¯à½Ð°Ý~
¦p¦ó¥i¥H¤£¦A¶}·sÀɤU
ª½±µ¦b
²{¦³ªºexcelÀɮפ¤¡A
Sheet2ªº¤u§@ªí
A5¶×¤J
·PÁÂ |
|