CSVファイルの文字コードがShift_JISやUTF-8(BOMあり)でない場合、Excelで開くと文字化けします。これを文字化けしない様にVBAでコード変換するには次のようなプロシージャ(マクロ)を作ると便利です。
このコードを動かす為にはADODB.Streamを使えるようにしなければいけません。具体的には、参照設定にて「Microsoft AxtiveX Data Objects X.X Library」を追加します。
参照設定がわからない人は、
参照設定を修正、削除する方法などが参考になります。
参考:
VBA:VBAでファイルの文字コードを変換するサンプルプログラム
NonSoft - ADODB.Streamによる文字コード変換のサンプル(VB6)
0 件のコメント:
コメントを投稿