初心者のよしです。
よろしくお願いします。
テキストファイルに書き込みをするデータを動的に
したいのですが、3つの項目をカンマ区切りに1レコード
に出力できません。
Dim fileNo As Integer
Dim strData As String
fileNo = FreeFile
Open "abc.txt" For Append As #fileNo
Write #fileNo, "a","b","c"
abc.txtファイルを開いて確認すると
"a","b","c"
カンマ区切りになります。
Write #fileNo, "a","b","c" <- 部分を動的にしたい
このようにした場合、
strData = "a" & """,""" & "b" & """,""" & "c"
Write #fileNo,strData
確認すると
"a"",""b"",""c" このようになり
"a","b","c" なりません
どのようにすれば、
"a","b","c" このようになるのでしょうか?
自己解決しました。
strData = Chr(&H22) & "a" & Chr(&H22) & "," _
& Chr(&H22) & "b" & Chr(&H22) & "," _
& Chr(&H22) & "c" & Chr(&H22)
これでうまくいけました。