【VBA】ファイルに1行書き込む(WriteLine)

投稿者: | 2023年5月24日
excelアイコン

TextStreamオブジェクトWriteLineメソッドについてです。

WriteLineメソッド

概要

1行(指定文字と改行文字)書き込みます。

構文

TextStreamObject.WriteLine ([string])

[]は省略可。

WriteLineメソッドの引数

引 数必須 / 省略可詳 細

文字
(string)

省略可

書き込む文字を指定。
省略した場合は改行文字だけが書き込まれます。

 

VBAサンプル

引数を省略した場合

まずFileSystemObjectをセットして、FileSystemObjectのOpenTextFileメソッドで上書きモードに設定して指定したファイルを開きTextStreamオブジェクトをセットします。あとはTextStreamオブジェクトのWriteLineメソッドで引数なしにすると改行文字だけが書き込まれます。

結果

引数を省略した場合は改行文字のみが書き込まれます。(メモ帳では改行がわからないので、Sakuraエディタを使用しています)

VBA_Writeline1

 

引数を省略しない場合

For~Nextの10回の反復処理でTextStreamオブジェクトのWriteLineメソッドで変数nを書き込む以外は先程と一緒です。指定したファイルに1行(変数nと改行文字)書き込み、次の行に移動して再度書き込みを繰り返します。

結果

1行(変数nと改行文字)ごとに書き込まれます(メモ帳では改行がわからないので、Sakuraエディタを使用しています)

VBA_WriteLine2