我应该使用哪个版本的null？

Question

Excel不断提出错误消息： 编译错误

无效使用对象

If range("C13:17").Find(11) = Nothing Then
                'Do nothing
            Else
                range(findeleven).Select
                ActiveCell.FormulaR1C1 = 1
            End If

请帮助： - ）

BTW用VBA编写

Answer 1

希望这会对你有所帮助:)。

Sub Search()
Range("C13:C17").Select
With Selection
Set c = .Find(11, LookIn:=xlValues)
If Not c Is Nothing Then
                
            Else
                Range("Your range").Select
                ActiveCell.FormulaR1C1 = 1
            End If
End With
End Sub