有值时,对象需要错误

Question

我一直为cellP.value得到一个对象必需的错误但是范围有值...我似乎无法想出这一个......

rng3 = Worksheets("Populations").Range("A2:A20")

For Each cellP In rng3

    If cellP > 0 Then

        Debug.Print cellP.Value

Answer 1

如果还没有,请附上一份Dim声明rng3.

Dim rng3 As Range

然后更改用于设置引用的语法 rng3

Set rng3 = ThisWorkbook.Sheets("Populations").Range("A2:A20")