Access VBAでのファイル書き出し（入出力）

いたってシンプル

　　Dim strFilePath As String
    Dim intFileNo As Integer
    Dim strData As String
    
    strFilePath = "Pathを含めたファイル名"
    intFileNo = FreeFile
    
    Open strFilePath For Output As #intFileNo
       
    Print #intFileNo, "書き出したい内容"
       
    Close intFileNo