Object Required Error

Hello,

I am struggling with a bit of code. The "Object Required" error comes here:

Row1 = AcctNumMatch.Row

Here is the rest of my code for reference.

Sub Macro1()

Dim LastRow As Integer
Dim AcctNum As Variant
Dim AcctNumMatch As Variant

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

For i = 2 To LastRow

AcctNum = Cells(i, 3)

With Sheets("Before Clearing").Range(Cells(i, 3), Cells(LastRow, 3))

    AcctNumMatch = .Find(AcctNum, LookIn:=xlValues)

End With


If AcctNumMatch = Empty Then
    Cells(i, 11).Value = "No Match"
    GoTo Skip1
End If

Cells(i, 11).Value = "Match"
Row1 = AcctNumMatch.Row
Cells(Row1, 11) = "Match"

Skip1:

Next i

End Sub

Thanks for the help!

Steve