l--*_*''' 10 excel vba excel-vba
我需要打开一个我不知道的完整文件名的文件.
我知道文件名是这样的.
filename*esy
Run Code Online (Sandbox Code Playgroud)
我肯定知道在给定目录中只出现过一次此文件.
Ale*_* K. 17
filename*esy 已经是一个"贝壳准备好"的通配符了,如果多数情况下,你可以简单地说;
const SOME_PATH as string = "c:\rootdir\"
...
Dim file As String
file = Dir$(SOME_PATH & "filename*esy" & ".*")
If (Len(file) > 0) Then
MsgBox "found " & file
End If
Run Code Online (Sandbox Code Playgroud)
只需调用(或循环直到空)file = Dir$()即可获得下一个匹配.