输入框:类型不匹配错误

时间:2015-11-11 14:51:11

标签: excel vba excel-vba inputbox

我在VBA中有一个Do-While循环,要求用户提供他们公司的UserID。这用于在个人文件夹中查找文件夹,并不是那么重要。

我使用输入框,因为我不知道我会怎么做:

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) > ""

基本上,这将询问用户UserID,如果用户选择按钮"取消",它将退出子。如果没有,它将采用UserID并确保它存在。 我在行

时遇到类型不匹配错误
If filepath2 = False Then Exit Sub

由于它期望布尔值,我认为。

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

如果没有,我该如何输入支票?

1 个答案:

答案 0 :(得分:0)

我明白了。

只需要改变

If filepath2 = False Then Exit Sub

If filepath2 = "False" Then Exit Sub

只需更改为字符串。