Sorry about that. Had a brain fart. Go with Dave Peterson's suggestion.


"PCLIVE" wrote in message
...
You may need to post more of your code. But on first glance, it appears
you have periods in various places that I don't understand. I was
assuming everything was working with the exception of selecting one row
up. Try this:

LastRowInB = Cells(Rows.Count, "B").End(xlUp).Row
Range("A1:C" & FoundCell.Row.Offset(-1, 0)).Select

HTH,
Paul



"Stan" wrote in message
...
Regretfully that gives me an invalid qualifier error.

"PCLIVE" wrote:

Maybe this:

Range("A1:C" & FoundCell.Row.Offset(-1, 0)).Select

Regards,
Paul

"Stan" wrote in message
...
Can anyone tell me what I need to add to the code below to move the
range
up
1 row?

LastRowInB = .Cells(.Rows.Count, "B").End(xlUp).Row
.Range("A1:C" & FoundCell.Row).Select


Many thanks!