ExcelVBAで扱うテキストファイルデータ

質問

MSOffice2003のExcelVBAでテキストファイル（文字コードはUTF-8)内の全角文字データを入力し、そのまま更新しないで、別ファイル名で出力したら、文字化け（ANSI化)した。どうすればUTF-8のまま出力できますか？
「（フ）」（X'EFBBBFEFBC88E38395EFBC89'）がX'8145BF814588E3839581458145'に化けます。
テキストファイルはCreateObject("Scripting.FileSystemObject")を定義して、
入力は、Open F_in For Input As #1でOPENし、Line Input #1, I_bufで入力し、
出力は、Open F_out For Output As #2でOPENし、Print #2, I_bufと出力した。

回答No.1

bin-chan

変数[I_buf]はどういった型で宣言してますか？

StrConv関数を使用することになると思います。

お礼

早速のご回答ありがとうございました。変数[I_buf]はstringで定義してます。ご教示しただいたstrconv関数ですが、関数定数の64と128の使い方の違いを良く理解できていません。入力したI_bufエリアのデータをstrconv関数を通して、結果の違いを比較してみます。