今、このようなものを作りました。
Dim test
cell = 1
Open "c:\windows\temp\data.txt" For Input As #3
Do While cell < 99
Line Input #3, test
Worksheets("sheet3").Activate
Worksheets("sheet3").Cells(cell, 1) = test
cell = cell + 1
Loop
Close #3
OPENを使って、ローカルディスクにあるテキストファイルからデータを
取得しているのですが、これをリストボックス内のデータを取得するよう
にするにはどのようにすれば良いのでしょうか?
よろしくお願い致します。
自力解決出来ました。
お騒がせしました。
ツイート | ![]() |