Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

FileSystemObject：テキストファイルを作成（CreateTextFile メソッド）

2016/04/07 2016/05/21

テキストファイルを作成（CreateTextFile メソッド）

FileSystemObject（FSO）を使用して、テキストを作成します。FileSystemObject（FSO）のインスタンスを生成する方法は、ファイルシステムオブジェクト（FileSystemObject）の使い方を参照してください。

【書式】

object.CreateTextFile ( filename [, overwrite ,unicode ] )

引数・戻り値

object ・・・ FileSystemObject オブジェクト または、Folder オブジェクト を指定します。
filename ・・・作成するテキストファイルのパスを含む名前を文字列で指定します。
overwrite ・・・ filename で指定したファイルが存在する場合に、上書きするかどうかを示す Boolean の値を指定します。True を指定した場合、上書きし、False を指定した場合は上書きしません。既定値は、False です。
unicode ・・・ Unicode ファイルを作成するか、ASCII ファイルを作成するかを示す Boolean の値を指定します。Unicode ファイルとして作成する場合は True、ASCII ファイルとして作成する場合は False を指定します。省略した場合は、ASCII ファイルが作成されます。
戻り値・・・新規作成されたテキストファイルを表す TextStream オブジェクト。

引数 overwrite が False の場合、または省略した場合は、引数 filename が既に存在するとエラーになります。

FSO を使ったテキストファイルの使い方については、FileSystemObject：テキストファイルを操作する（TextStream オブジェクト）を参照してください。

CreateTextFile メソッド使用例

サンプルVBAソース

　
Sub Sample_CreateTextFile()

    Dim fso As New FileSystemObject
    Dim myFile As TextStream
    
    Set myFile = fso.CreateTextFile( _
                    FileName:="C:\Documents\data\mytext1.txt", _
                    overwrite:=True, _
                    Unicode:=False)
    
    myFile.WriteLine ("おはようございます！")
    myFile.WriteLine ("さようなら。")

    myFile.Close

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

　

Sub Sample_CreateTextFile()

Dim fso As New FileSystemObject

Dim myFile As TextStream

Set myFile = fso.CreateTextFile( _

FileName:="C:\Documents\data\mytext1.txt", _

overwrite:=True, _

Unicode:=False)

myFile.WriteLine ("おはようございます！")

myFile.WriteLine ("さようなら。")

myFile.Close

End Sub

　

実行結果

作成されたテキストファイルの内容

- FileSystemObject CreateObject 関数, CreateTextFile メソッド, Excel・ファイルの操作, FileSystemObject オブジェクト, Microsoft Scripting Runtime, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: FileSystemObject：フォルダやファイルを削除（Delete メソッド）

フォルダやファイルを削除（Delete メソッド） FileSystemObje …

: FileSystemObject：ファイル・フォルダの最終更新日時を取得（DateLastModified プロパティ）

ファイル・フォルダの最終更新日時を取得（DateLastModified プロパ …

: FileSystemObject：フォルダをコピー（CopyFolder メソッド）

フォルダをコピー（CopyFolder メソッド） FileSystemObje …

: FileSystemObject：フォルダやファイルの種類を調べる（Type プロパティ）

フォルダやファイルの種類を取得（Type プロパティ） FileSystemOb …

: FileSystemObject：フォルダやファイルを移動（Move メソッド）

フォルダやファイルを移動（Move メソッド） FileSystemObject …

: FileSystemObject：File オブジェクトを取得（GetFile）

File オブジェクトを取得（GetFile メソッド） FileSystemO …

: FileSystemObject：指定したファイル名から拡張子を取得する（GetExtensionName）

ファイル名から拡張子を取得（GetExtensionName メソッド） Fil …

: FileSystemObject：ファイルをコピー（CopyFile メソッド）

ファイルをコピーする（CopyFile メソッド） FileSystemObje …

: FileSystemObject：ファイル・フォルダの最終アクセス日時を取得（DateLastAccessed プロパティ）

ファイル・フォルダの最終アクセス日時を取得（DateLastAccessed プ …

: FileSystemObject：一時ファイルの名前を自動的に作成（GetTempName）

一時ファイルの名前を自動的に作成（GetTempName メソッド） FileS …

PREV: FileSystemObject：フォルダの作成（CreateFolder メソッド）
NEXT: FileSystemObject：ファイル・フォルダを削除する（DeleteFile メソッド,DeleteFolder メソッド）