vba - VBA のフラット ファイルに引用符なしで文字列を出力する

Question

Excelファイルの同じディレクトリに、1行だけでフラットファイルを作成するvba関数を作成していますが、すべて正常に動作します

しかし、文字列の中に含まれている行を印刷すると、引用符の中にメッセージが表示されます

私が何かを期待するなら

HDR201412101136452014121090105500000000000000000000

私はこれを取得します

"HDR201412101136452014121090105500000000000000000000"

これは私のコードです:

Public Function generateFlatFile()

    Open ThisWorkbook.Path & "\" & FLAT_FILE_NAME For Output As #1

    Dim header As String
    header = "HDR"
    header = header & Format(Now, "yyyymmddhhnnss")
    header = header & Format(Now, "yyyymmdd")
    header = header & Worksheets(BD).Cells(2, 3)
    header = header & 5
    header = header & "00000000000000000000"

    Write #1, header

    Close #1
End Function