求助：查找

令狐风

想在A列中查找"2012/01/04"

1. Sheets("原始数据1").Range ("A1:A" & Sheets("原始数据1").Cells(Rows.Count, 1).End(xlUp).Row).find("2012/1/4", lookin:= xlvalues)

复制代码

这个报错，说缺少 :=

请问正确的写法是什么？
谢谢！

Select

Sub 按钮1_Click()
    Dim rng As Range
    With Sheets("原始数据1")
        Set rng = .Range("A1:A" & .Cells(Rows.Count, 1).End(xlUp).Row)
        Set rng = rng.Find("2012/1/4", LookIn:=xlValues)
    End With
    If Not rng Is Nothing Then
        '自行修改
    End If
End Sub