※本ブログのページには広告主との提携による広告や宣伝、プロモーションが含まれます。当ブログを経由しての商品の購入や、サービス申し込みが発生すると、それらの提携企業からの成果報酬を受けとる場合があります。

VBA|CreateTextFileメソッド(ファイルシステムオブジェクト)

指定したファイル名のファイルを作成し、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

作成するファイルのパス(Filename)の末尾は拡張子名まで書こうね。

PR

独学でプログラミングをはじめてみたけど、このままの学習方法に不安を感じているのなら、
オンラインスクールで現役エンジニアのサポートがあるテックアカデミーがおすすめ。
スキマ時間に学べて仕事も保証。必ず副業、始められます。まずは無料でプログラミング体験

コメント

タイトルとURLをコピーしました