CSVファイルの読み込みでコメントを無視するには？ (ID:108948)

名前

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

本文 VB始めて間もないのでこれでいいのかはわかりませんが 一応こんな感じでできました。 Do Until EOF(Fno) AD = Seek(Fno) Input #Fno, strtemp If Left(strtemp, 1) = "'" Then Seek #Fno, AD Line Input #Fno, strtemp strtemp = "" End If Debug.Print strtemp Loop 初めにseekで読み取り位置を調べて読み込んだ文字の先頭に"'"があったら 読み取り位置を戻してline inputって感じです。