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

or maybe

.Range("A1:C" & lastrowinB - 1).Select



Stan wrote:

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!

--

Dave Peterson