VBAは標準ではShift-JISかUTF16LEのみ マクロを使ってHTMLの出力をする際にUTF-8で書き出したかったのですが、WriteLine()関数などでは基本的にShift-Jisになるようです。 UTF-8を書き出すにはADODB.Streamを使う(設定が必要) Visual Basic Editor のメニューから[ツール]→[参照設定]を選び,[参照可能なライブラリファイル]の中から "Microsoft ActiveX Data Objects x.x Library" にチェックを入れます。 バージョンは最新のものでOK? サンプルコード 書き出し用オブジェクトの準備 Dim output As ADODB.Stream Set output = New ADODB.Stream With output .Type = adTypeText .Charset = "