数据源等于输入框值

Question

我有一个更新我的Access数据库的Excel文件，但我意识到Access数据库会定期更改位置，所以我希望文件位置由输入框输入并使用。我已经尝试了案例选择，但这还没有成功，这是我到目前为止所做的：

instantiateItem

Answer 1

我更喜欢使用FileDialog，因为它更能防止无效输入。但是，如果您只想使用输入框，则可以使用Dir函数验证它是否已解析为现有文件路径。

d = InputBox(Prompt:="Enter file path", Title:="Please enter the file path", Default:="File Location")
If Dir(d) = vbNullString
    'This is not a valid path, you might want to show a messagebox.
    Exit Sub
End If