指定したファイル名のファイルを作成し、TextStream オブジェクトを返します。
※ファイルシステムオブジェクト(FileSystemObject)についてはこちら
CreateTextFileメソッドの構文
構文
ファイルシステムオブジェクト.CreateTextFile 作成するファイルのパス(Filename),上書き設定(Overwrite),ファイル種別設定(Unicode)
CreateTextFileメソッドの構成要素と引数
構成要素と引数
要素/引数 | 必須/任意 | 説明 |
---|---|---|
ファイルシステムオブジェクト (FSO) |
必須 | ファイルシステムオブジェクトを指定します。 |
作成するファイルのパス (Filename) |
必須 | 作成するファイルのパスを文字列で指定します。 |
上書き設定 (Overwrite) |
任意 | 既存ファイルを上書きするかを指定します。 True:上書きする(初期値) False:上書きしない |
ファイル種別設定 (Unicode) |
任意 | UnicodeファイルまたはASCIIファイルを指定します。 True:Unicodeファイル False:ASCIIファイル(初期値) |
その他のポイント
作成するファイルのパス(Filename)が既に存在するファイルであり、上書き設定(Overwrite)がFalseの指定であった場合はエラーが発生します。
CreateTextFileメソッドをつかったサンプルマクロ
以下のマクロは、CreateTextFileメソッドの引数に指定したファイルを作成します。また同じ名前のファイルが既に存在する場合はそのファイルの上書きを実行します。
サンプルコード
Option Explicit
Sub ファイルシステムオブジェクト_CreateTextFileメソッド()
'ファイルシステムオブジェクトを使うため準備
'①事前バインディングの場合はVBEのツールより参照設定で「Microsoft Scripting Runtime」にチェックをしてください。
Dim FSO As FileSystemObject
Set FSO = New FileSystemObject
'CreateTextFileメソッドの使用例
FSO.CreateTextFile "C:\Users\ユーザー名\Desktop\Test\テキストファイル.txt", True
End Sub
実行結果
C:\Users\ユーザー名\DesktopのTestフォルダの中にテキストファイルを作成します。
作成するファイルのパス(Filename)の末尾は拡張子名まで書こうね。
独学でプログラミングをはじめてみたけど、このままの学習方法に不安を感じているのなら、
オンラインスクールで現役エンジニアのサポートがあるテックアカデミーがおすすめ。
スキマ時間に学べて仕事も保証。必ず副業、始められます。まずは無料でプログラミング体験
オンラインスクールで現役エンジニアのサポートがあるテックアカデミーがおすすめ。
スキマ時間に学べて仕事も保証。必ず副業、始められます。まずは無料でプログラミング体験
コメント