使用通配符*填写文件名

Question

我正在编写一个VBA代码，以将文档附加到电子邮件中，但我只有文档名称的第一部分要附加。我试过用"*"最后，它找到了我所拥有的文件，但这不起作用。有人能帮忙吗？这就是我所拥有的：

If EmailType = "KiteWorks" Then
.Attachments.Add ("File Path (redacted)Results Enquiry " & AppLog.Cells(BatchRow, 2).Value & " " & BatchNumber & "*")
End If

(本节属于

我正在用一个名为"；结果查询2 2[Art].pdf"；但我一直收到一个错误，名称或目录无效。我认为问题在于通配符"*"我希望能填补"；[Art].pdf"；

事先非常感谢。

Answer 1

感谢BigBen让我意识到我有多傻。。。

将我的代码更新为：

If EmailType = "KiteWorks" Then
FilePath = "Path Redacted" & "Results Enquiry " & AppLog.Cells(BatchRow, 2).Value & " " & BatchNumber & "*"
FileExists = Dir(FilePath)
If FileExists = "" Then

MsgBox "Could not find PDF of script in scanned folder."

Else
.Attachments.Add ("Path Redacted" & FileExists)
End If

End If