|
こんにちは。
お返事ありがとうございます。
再度お聞きしてしまい申し訳ないのですが、
読み込むテキストデータは、タブ区切りです。
Rdataに入るデータが、タブすべて含めた1Lineのデータが入ってしまうのですが・・・。
例えば、
列数は、全部で4列
1 aaa bbb ccc
12 ddd fff gggg
13 hhhhh iiiiii jjjjj
といったタブ区切りのデータを読み込みます。
Excelのには、
A列 |B列 |C列
1 |aaa |ccc
12 |ddd |gggg
13 |hhhhh |jjjjj
といった形でデータを貼り付けたいのですが・・・。
すいません、どうもうまくいかないのでもう一度ご助言いただけないでしょうか?
列数= 87
>For I = 1 To 列数
> Input #1, Rdata
> If I = 0 Then
> CNT = CNT + 1
> Tbl(CNT, 1) = Rdata
> ElseIf I = 2 Then
> CNT2 = CNT2 + 1
> Tbl2(CNT2, 2) = Rdata
> ElseIf I = 3 Then
> CNT3 = CNT3 + 1
> Tbl3(CNT3, 3) = Rdata
> End If
>Next
|
|