ファイルが見つからない時、スルーしたい。

こちらで教えて頂いたVBマクロですが更に改善しファイルが見つからないときはスルーして
次のステップにいくようにしたいのですが？教えてください。

Sub Macro5()
' Macro5 Macro
' マクロ記録日 : 2012/9/12
'
Dim myPath As String
myPath = ThisWorkbook.Path

Kill myPath & "\A.xls"
Kill myPath & "\B.xls"
Kill myPath & "\B.ex_"

End Sub

No.2 ベストアンサー 回答者： tsunji 回答日時： 2012/09/14 12:51

killを使う前に

on error resume next　を宣言し
最後に
on error goto 0 としておく。

No.1 回答者： x-1919 回答日時： 2012/09/14 12:46

VBA ネイティブな Dir 関数を使う。

または FilsSystemObject の FileExists 関数を使う。
http://officetanaka.net/excel/vba/filesystemobje …

この回答へのお礼

早速のご回答ありがとうございます。すぐやってみます。

お礼日時：2012/09/14 12:56