Mac版エクセル2019のVBAでShift-JISをUTF-8（BOM付き）へ変換する方法教えて下さい

Question

【実現したいこと】

Mac版エクセル2019のVBAでテキストファイル（Shift-JIS）をUTF-8（BOM付き）へ変換する

もしくは、

UTF-8（BOM付き）で保存する。

【やってみたこと】

Windows版はActiveX Data Objectを使って変換できるようなのですが、
MacにはActiveXがない為使えませんでした。

下記コードで、テキストファイルを作成すると、Shift-JISで保存されます。

Sub ﾘｽﾄｲﾝ()

Open "パス名/list01.iim" For Output As #1

Dim i As Long
Dim f As String

For i = 7 To 10000

If Cells(i, 1).Value = "" Then
Exit For
End If

If i > 7 Then
Print #1, ""
End If

f = Cells(i, 1).Value
Print #1, CStr(f);

Next

Close #1

End Sub

Answer 1

VBAで完結させる必要がありますか？
Shift-JISで出力したあと、別途変換するという考え方もあるのでは。

macでファイルの文字コードを変換する『nkfコマンド』の使い方とオプション一覧

Comments

[tomo_1111]

回答ありがとうございます！
複数、同じ工程があるため、できれば1回で終わらせていです。
貴重なご意見ありがとうございます。