実現したいこと
CSVファイルをCreateTextFileで作成しようとしています。文字コードは初期設定でASCIIになると
認識していたのですが、仮の作成段階で、結果が一貫していないように思え、
質問させていただきます。今回はASCIIで作成したいのです。
よろしくお願いします。
前提
エクセルのVBAからコードを書きました。
Microsoft Scripting Runtimeに参照設定をしました。
発生している問題・エラーメッセージ
作成したCSVファイルをメモ帳で開いたときに、文字コードが ANSIになったり、UTF-8になったりしています。 コードのミスなのか、何か誤って認識しているのか、わかりません。 しかもCreateTextファイルで作成されるテキストファイルはANSIかUTF-16のどちらかと思っていたのですが。。。
該当のソースコード
Sub test() Dim myFSO As New FileSystemObject Dim myCSV As TextStream Set myCSV = myFSO.CreateTextFile("C:\123.csv") Dim str1 As String str1 = "あいうえお" myCSV.WriteLine str1 myCSV.Close Set myCSV = Nothing Set myFSO = Nothing End Sub
試したこと
上記のコードで作成されたCSVファイルをメモ帳で開くと、ANSIと表示されます(その1.png)。
ただ、コードの変数 strを ”123abc” や "***" などにして、メモ帳で開くとUTF-8と表示されます
(その2.png)(その3.png)。
補足情報(FW/ツールのバージョンなど)
ここにより詳細な情報を記載してください。

回答3件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2023/09/22 08:06