|
お世話になります。
VBA初心者です。よろしくお願いします。
さて、現在以下のようなテキストファイルがあります。
そのテキストファイルの中のデータをエクセルに読み込み
必要な箇所のデータを抜き取り新しいファイルに整理したい
のですが、ご教授願います。
対象テキストファイル数は、以下のファイル名が対象となります。
ファイルは、デスクトップのtestというフォルダ内にあります。
(テキストファイル名)
22030808_160 22(機番)03(03年)08(08月)08(08日)_160(160番目)
対象データは、22機番の03年08月07日から08日の001番目からのデータすべて
001番目から999番目までのデータファイルとなります。
(テキストファイル内容)
右位置1 = , 5.1 , 224.1 , 51
右位置2 = , 10.9 , 232.1 , 109
左位置1 = , 5.1 , 224.1 , 51
左位置2 = , 10.9 , 232.1 , 109
右P1 = , 34.7 , 58.8 , 347
右P2 = , 164.9 , 79.4 , 1649
左P1 = , 25.3 , 57.6 , 253
左P2 = , 154.5 , 78.4 , 1545
↑数値は、右よりX,Y,データポイント数となってます。
これらを以下のようにエクセルファイルに整理したい
A B C D E F G H I
1 ファイル名 右P1(X) 右P1(Y) 右P2(X) 右P2(Y) 左P1(X) 左P1(Y) 左P2(X) 左P2(Y)
2 22030808_001 * * * * * * * *
3 ・
4 ・
5 22030808_160 34.7 58.8 164.9 79.4 25.3 57.6 154.5 78.4
以上よろしくご教授願います。
|
|