シートの値をテキストファイルに出力するマクロです。
例たとえば、このようなシートのセルB2～B7までの値をテキストファイルに出力するとします。
[出力]ボタンのClickイベントハンドラに次のように記述します。
Sub button1_Click()
Dim i As Integer
Dim filePath As String
filePath = "C:\work\Excel\output.txt"
'ファイルのオープン
Open...
