VBA IF语句在满足条件时有效，但在条件不满足时会出现不匹配错误。

Question

这里的VBA初学者......这可能是一个我忽略的简单解决方案，但我找不到其他问题来解决我的问题。 如果单元格B1不是#N / A，我使用以下代码删除第一行...否则不执行任何操作。

If [B1].Value <> "#N/A" Then
[B1].EntireRow.Delete
End If

如果满足条件，则删除第一行并且代码完美运行。但是，如果不满足条件，则会出现不匹配错误（而不是仅仅转到下一行）。有任何想法吗？谢谢。

Answer 1

错误Ui::Example::setupUi(QWidget*)不是字符串，因此#N/A实际上不等于文字.Value;它是一个#N/A值（Error是一种数据类型），并且Error无法强制进出Error。

您可以使用以下方法测试错误：

String

或测试If not IsError(ActiveSheet.Range("B1").Value) Then

.Text