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：ドライブの存在確認（DriveExists メソッド）

ドライブの存在確認（DriveExists メソッド） FileSystemOb …

: FileSystemObject：ドライブを取得する（GetDrive メソッド）

ドライブを取得する（GetDrive メソッド） FileSystemObjec …

: FileSystemObject：フォルダの存在確認（FolderExists メソッド）

フォルダの存在確認（FolderExists メソッド） FileSystemO …

: FileSystemObject：指定したファイル名から拡張子を除いた文字列を取得する（GetBaseName）

ファイル名から拡張子を除いた文字列を取得（GetBaseName メソッド） F …

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

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

: FileSystemObject：ファイル・フォルダの属性を取得または設定（Attributes プロパティ）

ファイル・フォルダの属性を取得または設定（Attributes プロパティ）フ …

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

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

: FileSystemObject：フォルダを移動する（MoveFolder）

フォルダを移動する（MoveFolder メソッド） FileSystemObj …

: FileSystemObject：フォルダまたはファイルの名前を取得または設定する（Name プロパティ）

フォルダまたはファイルの名前を取得または設定する（Name プロパティ） Fil …

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

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

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