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

FileSystemObjectのCreateTextFileメソッドは、指定したファイル名のファイルを作成し、TextStream オブジェクトを返します。

※ファイルシステムオブジェクト(FileSystemObject)についてはこちら

VBA｜ファイルシステムオブジェクト(FileSystemObject)でファイルやフォルダを操作する

VBAではファイルやフォルダを操作するときにつかえる便利なファイルシステムオブジェクト(FileSystemObject)の利用ができます。この記事ではファイルシステムオブジェクトをあつかうための方法や、使える機能(メソッドやプロパティ)を紹介しています。

Contents

CreateTextFileメソッドの構文

構文

ファイルシステムオブジェクト.CreateTextFile 作成するファイルのパス(Filename),上書き設定(Overwrite),ファイル種別設定(Unicode)

CreateTextFileメソッドの構成要素と引数

構成要素と引数

要素／引数	必須／任意	説明
ファイルシステムオブジェクト (FSO)	必須	ファイルシステムオブジェクトを指定します。
作成するファイルのパス (Filename)	必須	作成するファイルのパスを文字列で指定します。
上書き設定 (Overwrite)	任意	既存ファイルを上書きするかを指定します。 True：上書きする(初期値) False：上書きしない
ファイル種別設定 (Unicode)	任意	UnicodeファイルまたはASCIIファイルを指定します。 True:Unicodeファイル False:ASCIIファイル(初期値)

その他のポイント

作成するファイルのパス(Filename)が既に存在するファイルであり、上書き設定(Overwrite)がFalseの指定であった場合はエラーが発生します。

CreateTextFileメソッドをつかったサンプルマクロ

以下のマクロは、CreateTextFileメソッドの引数に指定したファイルを作成します。また同じ名前のファイルが既に存在する場合はそのファイルの上書きを実行します。

VBAサンプルコード

  
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

11行目

CreateTextFileメソッドを利用してテキストファイルを作成する処理です。

実行結果

C:\Users\ユーザー名\DesktopのTestフォルダの中にテキストファイルを作成します。