• 締切済み

VBA CSVファイルの文字コードをANSIからUFT-8に変更する方法

VBAを勉強している初心者です。 VBAでCSVファイルの文字をANSIからUFT-8に変更する方法を教えてもらえませんでしょうか。

みんなの回答

  • nda23
  • ベストアンサー率54% (777/1415)
回答No.1

ADODBのStreamモジュールを使うのは如何でしょう。 単なるファイル変換の例 Dim JIS, UTF Set JIS = CreateObject("ADODB.Stream") JIS.Open JIS.Type = 2 JIS.Charset = "shift_jis" JIS.LoadFromFile "C:\~\JIS.csv" Set UTF = CreateObject("ADODB.Stream") UTF.Open UTF.Type = 2 UTF.Charset = "utf-8" JIS.CopyTo UTF UTF.SaveToFile "C:\~\UTF.csv", 2 JIS.Close Set JIS = Nothing UTF.Close Set UTF = Nothing

sasakikisa
質問者

お礼

nda23様、早速の回答ありがとうございます。 お教えいただいたADODBのstreamモジュールを使用してみます。^^

関連するQ&A

専門家に質問してみよう