リストボックスからデータ取得するのは？ (ID:105463)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 今、このようなものを作りました。 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を使って、ローカルディスクにあるテキストファイルからデータを 取得しているのですが、これをリストボックス内のデータを取得するよう にするにはどのようにすれば良いのでしょうか？ よろしくお願い致します。