|
こんにちは、
Line Input でも読み込めるし、ファイルメニューからファイルを開くでも読み込めましたけど.....。(読み込むデータ形式はスペース)
どちらにしても読み組む時は、頭にゼロがつくから全フィールド文字列としてください。
普通に開いてそれをコピペでも良いだろうし...。
こんな感じに。
↓さっき試してたファイルメニューから開く方。
Sub Macro1()
Workbooks.OpenText FileName:= _
"C:\Documents and Settings\GTV\デスクトップ\arare.DMP", StartRow:=1, DataType _
:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), Array(7, 1), Array(9, 1), Array(13, 1 _
), Array(16, 1), Array(19, 1), Array(22, 1), Array(25, 1), Array(28, 1), Array(31, 1), Array _
(34, 1), Array(37, 1), Array(40, 1), Array(43, 1), Array(46, 1), Array(49, 1), Array(52, 1), _
Array(55, 1), Array(59, 1))
End Sub
|
|