Excel Find Method 1

[bajo71]

Hello,

Using the following code, I am attempting to insert a row where the criteria in find method is met. However, it only inserts a cell. Any suggestions?

Many thanks.......

With Sheets("Report")
.Find("Data!" & tmpAddress).Insert shift:=xlDown
End With

 

[SkipVought]

Hi,

        With Sheets("Report")
           .Find("Data!" & tmpAddress)[b].entirerow[/b].Insert shift:=xlDown
        End With

Skip,
^{Don't let the Diatribe...
talk you to death!}
_{Just traded in my old subtlety...
for a NUANCE!}

 

[bajo71]

I tried .Find("Data!" & tmpAddress).entirerow.Insert shift:=xlDown and received the 'Object does not support method or property error'

 

[bajo71]

Apologies, I must've deleted the Cells object. With this:

With Sheets("Report").Cells
.Find("Data!" & tmpAddress).EntireRow.Insert shift:=xlDown
End With

EntireRow.Insert works perfectly

Thanks!