查找可能位于三个位置之一的文件

我需要编写一个vba脚本来查找文件。 该文件可能在三个不同的位置

我如何find文件的位置？

该文件必须具有特定的string作为文件名的一部分

我的文件名可能是9424.bas或9424a.esy或9424_.bas或9424 …艾西，我知道什么文件名正是，但我知道重要的字符9424

Answer 1

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循环将是更好的解决scheme。

Answer 2

 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