ExcelのVBAでCSVを読み込むと通貨になる

質問

Excel2010のVBAでCSVファイルを読み込んで処理させたいのですが、読み込んだデータをExcelが勝手に別のデータに変えてしまうので困っています。
例えば、123,456というデータは、フィールドにカンマがあるので、CSVでは"123,456"となりますが、これを以下のようなVBAのコードで読み込ませると、書式が通貨として扱われてしまって、データも123456になってしまいます。文字列として読み込まれていれば正しいデータとして読み込まれるように思うのですが、文字列として読み込ませる方法が分かりません。正しく元のデータ123,456のまま読み込ませるにはどうすればいいのでしょうか。
なお、CSVの各フィールドにカンマやダブルクォーテーションが混在していると、各フィールドに分割する処理が複雑でよく分からないので、下記のコードのようにExcelの機能でCSVを各フィールドに分割される方法で読み込ませたいです。
よろしくお願いします。

Workbooks.Open Filename:= "file.csv"

回答No.1

keithin · ベストアンサー

＞文字列として読み込ませる方法

データタブの「テキストファイル」で当該のＣＳＶファイルを指定、カンマ区切りを指定、各列の設定を「文字列」に漏れなく設定して読み込ませる

という手順を新しいマクロの記録でマクロに録って利用する

といった段取りで出来ます。

＞正しく元のデータ123,456のまま読み込ませる

ふつーに「エクセル頼みでＣＳＶを開かせる」だけでは、ご質問の状況が発生するのを防ぐ方法はありません。

もっとも一応一般論として言えば、「生データがカンマ抜きの123456に変わっている」「書式によってカンマ表示が追加されている」のは「エクセルの正しいデータの姿」なので、今回ご相談のように「無理矢理文字列で記入されていてほしい」と求める方が「間違ってる」と考える場合の方が多いです。もちろんあなたの目的に照らして特にそうしたいなら、それはそれであなたの自由ですけど。

お礼

通常のＣＳＶを開く方法では、防ぐことができないということが分かっただけでも質問してよかったです。
教えていただきましたテキストファイルを開いて個別に文字列を指定する方法でうまくいきました。
ありがとうございました。