Найти файл, который может быть в одном из трех мест

Question

Мне нужно написать скрипт VBA, который найдет файл. файл может находиться в трех разных местах

как мне найти файл?

файл должен иметь определенную строку как часть имени файла

мое имя файла может быть 9424.bas или 9424a.esy или 9424_.bas или 9424 ... да, я не знаю, какое именно имя файла, но я знаю важные символы 9424

Answer 1

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

If fso.FileExists("folder1" + "filename") then
    ' folder1
ElseIf fso.FileExists("folder2" + "filename") then
    ' folder2
ElseIf fso.FileExists("folder3" + "filename") then
    ' folder3
End If

Answer 2

If Dir("file_location_1") <> "" Then
  ''# File is in 1
ElseIf Dir("file_location_2") <> "" Then
  ''# File is in 2
ElseIf Dir("file_location_3") <> "" Then
  ''# File is in 3
Else
  ''# File is not found
End If

Для более чем трех возможных местоположений лучшим выбором будет цикл Array и For.