输入框：类型不匹配错误

Question

我在 VBA 中有一个 Do-While 循环，询问用户他们的公司用户 ID。这用于在他们的个人文件夹中查找文件夹，并没有那么重要。

我正在使用输入框，因为我不知道该怎么做：

Do
    filepath2 = Application.InputBox("Enter your User FDIC", "UFDIC")
    If filepath2 = False Then Exit Sub
    filepath3 = "C:\Users\" & filepath2 & "\Desktop\NSC\"
    Dir (filepath3)
Loop While Not Dir(filepath3) > ""

所以基本上，这将询问用户用户 ID，如果用户选择“取消”按钮，它将退出子。如果没有，它将获取 UserID 并确保它存在。 当涉及到该行时，我收到一个类型不匹配错误

If filepath2 = False Then Exit Sub

我认为是因为它需要一个布尔值。

我应该使用输入框以外的东西吗？

如果不是，我该如何输入检查？

Answer 1

我想通了。

只需要改变

If filepath2 = False Then Exit Sub

到

If filepath2 = "False" Then Exit Sub

只是更改为字符串。