Excel VBA テキストファイルを出力する方法

VBAでテキストファイルを出力する方法

エクセルを使用してテキストファイルを出力してみます。

サンプルコード

Sub txtOutput()
    Dim outputFilePath As String
    outputFilePath = "C:\tmp\output.txt"
    
    Open outputFilePath For Output As #1 
    Print #1, "Hello World"
    Close #1
End Sub

解説

5行目でOpenを使用して3行目で定義した「outputFilePath」のファイルをオープンしています。

このファイルがない場合は新規で作成されます。ある場合は、上書きされます。

消したくないファイルの場合は、バックアップを取得しておいてください。

   Open outputFilePath For Output As #1 

6行目でPrintを使用して5行目で定義した「#1」に出力したい文字列を指定します。

   Print #1, "Hello World"

7行目でCloseを使用して5行目で定義した「#1」のファイルを閉じましょう。

    Close #1