[VBA]Do
i = i + 1
Loop Until ActiveCell.Offset(-i) = "" Or ActiveCell.Offset(-i) <= cvalue
ActiveCell.Offset(-i).Select
[/VBA]
[VBA]Do
i = i + 1
Loop Until ActiveCell.Offset(-i) = "" Or ActiveCell.Offset(-i) <= cvalue
ActiveCell.Offset(-i).Select
[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'