VBA：Application.Workbooks.Open（）打开文件浏览器

Question

我正在尝试使用代码块：

Sub OpenPulledReports(ByRef filepath)

MsgBox (Dir(filepath))

If Dir(filepath) <> "" Then
    Application.Workbooks.Open (filepath)
End If

End Sub

检查文件是否已打开，如果没有则打开。当这个Sub运行时，我无法通过它进行调试，而是只需要End Sub。

但是，这不是我的问题。运行时，将打开一个文件资源管理器窗口，其标题为“更新值：文件名称”（如文件路径到达的文件名）。这实际上减慢了速度。另外，我很确定我的Dir(filepath)没有做我期待的事情。

感谢您的帮助。