QA@IT
«回答へ戻る

回答を投稿

私もちょっと調べましたが、OpenTextのFieldInfoはテキストファイルのみ有効のようですね。
CSVファイルの出力を変更できるようであれば、数字文字列のダブルクォートのまえにイコールを入れたデータでOpen関数で開けばそれなりに見れるようになります。

="001","b","c","d[CR][LF]
e[CR][LF]
f[CR][LF]
g","h"

Workbooks.Open fileName:=取り込みたいファイルの名称

私もちょっと調べましたが、OpenTextのFieldInfoはテキストファイルのみ有効のようですね。
CSVファイルの出力を変更できるようであれば、数字文字列のダブルクォートのまえにイコールを入れたデータでOpen関数で開けばそれなりに見れるようになります。

="001","b","c","d[CR][LF]
e[CR][LF]
f[CR][LF]
g","h"

Workbooks.Open fileName:=取り込みたいファイルの名称