ファイルが無くエラーが出るとき別のファイルを探すマクロ

質問

エクセルでＨＰ上の別のエクセルファイルを開くマクロを組んでいます。
ところが毎日この作業をするのですが、ファイル名が不規則に3種類存在します。
例：
昨日は「価格0119」今日は「価格-0120」明日は「kakaku0121」という具合です。後部の日付は当日の日付がはいるので対応できていますが、前半の文字は不規則に変り、いづれか１つが正解です。
そこで、
---------------------------------------
もしも　「価格0120」があれば開く、
　無くてエラーが出るときは「価格-0120」を開く
さらに無いときは「kakaku0120」を開く。
---------------------------------------------
といつ構文を模索しています。
教えてください。

回答No.1

fujillin

エラーを発生させなくても、Dir関数を利用すればファイルの存在の有無を
確認できますから、それで判断するようにすれば良いのでは？
たとえば、こんな感じ？
（ファイル名の決まり方が不明なので適当にしてあります）

fName = "価格0120,価格-0120,kakaku0120"
For i = 0 To 2
fn = Split(fName,",")(i)
If Dir(×× & "\" & fn) <> "" Then Exit For Else fn = ""
Next i

＊（ ×× & "\" & fn　でファイルのパスを作成）