vbadocument对象未定义 vba 定义对象_未定义

Sub Macro4()
【vbadocument对象未定义 vba 定义对象】'
' Macro4 Macro
'
' 快捷键: Ctrl r
'
Range("C1:C23").Select

Selection.Find(What:="2014/4/28", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, MatchByte:=False, SearchFormat:=False).Activate
End Sub
运行提示：
运行时错误91
对象变量或with块变量未设置。