ファイルの存在を確認

Sub ExampleFileExists()
       '
       'ファイルD:\SampleFolder\sample1.txtが存在する場合
       If FileExists("D:\SampleFolder\sample1.txt") Then
               Msgbox("D:\SampleFolder\sample1.txt が存在します")
       End If
       '
       'ファイルD:\SampleFolder\sample2.txtが存在しない場合
       If FileExists("D:\SampleFolder\sample2.txt") = False Then
               Msgbox("D:\SampleFolder\sample2.txt は存在しません")
       End If
End Sub

ファイルの存在を確認する場合は、FileExists 関数を使用する。
FileExists 関数の書式は下記の通り :

FileExists( Pathname )

Pathname には、存在するか否かを確認するファイルのファイル名を示す
文字列式を記述する。Pathname にはフォルダ名およびドライブ名を含めて
指定することができる。
また、Pathname をURL指定することもできる。

FileExists 関数はファイルが存在した場合は戻り値として True を返し、存在
しない場合は戻り値として False を返す。