[asin:B01BM829D4:title] CSVファイルの一行目のみをスキップして新しいファイルを作成して、 そのファイルを読み込むことで、元のファイルはそのままの状態で残すことが可能です。 Sub CSV2VAL() Dim fSo As Object Dim buf As Variant Dim f As Object ' …