Select Loop Until ActiveCell.Value = CurrentD. It selects the first row that has data , and then should keep moving down the rows until the first ...
www.google.com.tw