I have the following piece of a code of which prompts an error 1004 "Unable to get the find property of the range class"
I have used this code for other procedures, but for some reason I can't figure out this error...
Can anyone spot anything FISHY
Would appreciated any advice
Thanks in advance,
Code:
With Worksheets("Adjustments").Range("B1:B" & Rows.Count)
NewRow = .Cells.Find("", .Cells(1, 2), xlFormulas, _
xlWhole, xlByColumns, xlNext).Row
' This finds a row starting from top that is empty to put the new values in!!!
Worksheets("Adjustments").Rows(NewRow & ":" & NewRow).Value = datai
End With
I have used this code for other procedures, but for some reason I can't figure out this error...
Can anyone spot anything FISHY
Would appreciated any advice
Thanks in advance,