如何在Excel VBA中将整数设置为null?

Arl*_*ler 1 excel null vba nothing

我试图检测是否设置了整数,如果没有,则跳过循环中的大部分代码(使用if语句).这就是我所拥有的.

Do While hws.Cells(r, 9).Value <> ""
    On Error Resume Next
    ar = Null
    ar = aws.Range("A:A").Find(hws.Cells(r, 2).Value).Row
    If Not IsNull(ar) Then
  'work with ar'
    End If
    r = r + 1
Loop
Run Code Online (Sandbox Code Playgroud)

但是,当我运行它时,ar = Null有问题.它说"无效使用null".

Foo*_*ole 8

定义为Integer的变量在VBA中不能为Null.你必须找到另一种方法来做你想要的.例如,使用不同的数据类型或使用幻数来表示null(例如-1).

在您的示例代码中,ar将被赋予Long值(Range.Row是Long)或者它将引发错误.