OfficeType
  1. ホーム
  2. Excel VBA
  3. エラー
  4. 実行時エラー'53':ファイルが見つかりません。

VBA～実行時エラー'53':ファイルが見つかりません。～Excel

エラー名

実行時エラー'53':ファイルが見つかりません。

image-01

原因

Kill,Name,Openステートメント等で指定したファイルパスのファイルが存在しないときに発生します。

解決策

ファイルパスが間違っている場合はファイルパスを修正します。

エラー回避

下のコードはファイルが存在しないときにメッセージを表示してエラー回避します。 

Sub test()

If Dir("D:\サンプル.txt") = "" Then

MsgBox "ファイルが存在しません"

Exit Sub

End If

Kill "D:\サンプル.txt"

End Sub

image-02