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：指定フォルダに含まれるすべてのフォルダを取得（SubFolders プロパティ）

フォルダに含まれるすべてのフォルダを取得（SubFolders プロパティ） F …

: FileSystemObject：Folder オブジェクトの取得

Folder オブジェクトの取得 Folder オブジェクトを取得するには、F …

: FileSystemObject：フォルダやファイルをコピー（Copy メソッド）

フォルダやファイルをコピー（Copy メソッド） FileSystemObjec …

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

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

: TextStream ファイルの位置（AtEndOfLine,AtEndOfStream,Column,Line）

AtEndOfLine プロパティ開いたファイル（TextStream ファイ …

: FileSystemObject：ファイル・フォルダの作成日時を取得（DateCreated プロパティ）

ファイル・フォルダの作成日時を取得（DateCreated プロパティ） Fil …

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

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

: FileSystemObject：Drive オブジェクトの主なプロパティ

Drive オブジェクトの取得 Drive オブジェクトを取得するには、FSO …

: FileSystemObject：ファイル・フォルダが存在するドライブを取得（Drive プロパティ）

ファイル・フォルダが存在するドライブを取得（Drive プロパティ） FileS …

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

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

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