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：ドライブを取得する（GetDrive メソッド）

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

: FileSystemObject：ファイルを移動する（MoveFile）

ファイルを移動する（MoveFile メソッド） FileSystemObjec …

: TextStream ファイルに書き込む（Write,WriteLine,WriteBlankLines）

Write メソッド TextStream ファイルに、指定した文字列を書き込み …

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

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

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

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

: TextStream ファイルを読み込む（Read,ReadLine,ReadAll）

ReadAll メソッド TextStream ファイルの内容全体を取得します。 …

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

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

: FileSystemObject：フォルダの作成（CreateFolder メソッド）

フォルダの作成（CreateFolder メソッド） FileSystemObj …

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

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

: FileSystemObject：ファイルを開く（OpenAsTextStream メソッド）

ファイルを開く（OpenAsTextStream メソッド）指定されたファイル …

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