Question

我得到了错误：

modals

当我尝试执行此代码时：

Run-time error '91': Object variable or With block variable not set

为什么？这行怎么了？

编辑

如果我正在管理文本或数字，则该代码有效。但是我遇到的问题是我在MsgBox Worksheets("Sheet2").Range("2:2").Find(Worksheets("Sheet1").Range("E5").Value, , , xlWhole)和Worksheets("Sheet1").Range("E5")上的日期。

Answer 1

将result分配给一个范围，然后使用.Find()来设置范围。如果未找到任何内容，则Range()将为Nothing：

Sub TestMe()

    Dim result As Range

    With Worksheets(1)
        Set result = .Range("2:2").Find("Something", LookAt:=xlWhole)
    End With

    If Not result Is Nothing Then
        Debug.Print result.Address
    Else
        Debug.Print "Something is not on the second row!"
    End If

End Sub

如果使用日期，则LookAt:=xlWhole参数是必须的：

Excel VBA：如何解决运行时错误“ 91”？

1 个答案: