Selecting a cell in a range
I want to select the first cell in an empty row in my range. How do I correct my code? Thanks! ---------- l_LastRow = Sheet5.Cells.Find(What:=" * ", After:=[A1], _ SearchDirection:=xlPrevious).Row Sheet5.Range("B3", Sheet5.Cells(l_LastRow + 1, 10)).Select For l_Count = Selection.Rows.Count To 1 Step -1 If WorksheetFunction.CountA(Selection.Rows(l_Count)) = 0 Then With Range(Cells(Selection.Rows(l_Count), 2).Address) .Value = 2005 End With End If Next -- Coolboy55 ------------------------------------------------------------------------ Coolboy55's Profile: http://www.excelforum.com/member.php...o&userid=26508 View this thread: http://www.excelforum.com/showthread...hreadid=400895 |
All times are GMT +1. The time now is 05:25 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com