VBAファイルを開く(読込,上書,追記 OpenTextFile)

投稿者: | 2023年4月17日
excelアイコン

FileSystemObjectのOpenTextFileメソッドについてです。

OpenTextFileメソッド

概要

ファイルを読込,上書き,追記のモードを設定して開き、TextStreamオブジェクトを返します。

構文

FileSystemObject.OpenTextFile (filename, [ iomode, [ create, [ format ]]])

[ ]は省略可

OpenTextFileメソッドの引数

引 数必須 / 省略可詳 細

ファイル名
(filename)

必須

ファイルパスを指定。

入出力モード
(iomode)

 省略可

入出力のモードを指定。
・読込み:ForReading
・書込み(上書):ForWriting
・書込み(追記):ForAppending

ファイル作成
(create)

省略可

 ファイルが存在しない場合、ファイルを作成するかをBool値で指定。
・True:作成する
・False:作成しない(既定値)

文字コード
(format)

省略可

開くファイルの文字コードを指定。
・省略 → ASCII形式でファイルが開きます。

入出力モードの引数の詳細

定 数詳 細

ForReading

1

ファイルを読み取り専用として開きます。

ForWriting

2

ファイルを書き込み専用(上書)として開きます。 

ForAppending

8

ファイルを書き込み専用(追記)として開きます。 

文字コードの引数の詳細

定 数詳 細

TristateUseDefault

-2

システムの既定の設定でファイルを開きます。

TristateTrue

-1

Unicode形式でファイルを開きます。

TristateFalse

0

Ascii形式でファイルを開きます(既定値)

 

VBAサンプル

ファイルを読み込む

FileSystemObjectOpenTextFileメソッドで指定したファイルパスを入力してForReading(読込モード)で開くと、TextStreamオブジェクトが使用できるようになります。

TextStreamオブジェクトのReadAllメソッドを使用するとファイルを読込ができます。

 

ファイルを上書き

FileSystemObjectOpenTextFileメソッドで指定したファイルパスを入力してForWriting(上書モード)で開くと、TextStreamオブジェクトが使用できるようになります。

TextStreamオブジェクトのWriteLineメソッドを使用すると、ファイルに上書きができます。

 

ファイルに追記

FileSystemObjectOpenTextFileメソッドで指定したファイルパスを入力してForAppending(追記モード)で開くと、TextStreamオブジェクトが使用できるようになります。

textStreamオブジェクトのWriteLineメソッドを使用すると、ファイルに追記できます。

 

ファイルが存在する時

FileSystemObjectOpenTextFileメソッドで指定したファイルパスを入力して、ForWriting(上書モード)True指定でファイルが存在しない場合はファイルを作成し、TextStreamオブジェクトが使用できるようになります。

TextStreamオブジェクトのWriteLineメソッドを使用すると、新規作成したファイル上書きができます。