Hidden Range
Hello All,
I have a large work sheet with multiple hidden rows. Is there a simple way to identify the last row of data (usually hidden) and select the a cell in the following row. I can do this by unhiding everything finding the end of the data (xlDown), identifing the last row then looping to hide all the appropriate data. I know there must be something easier. thanks |
Hidden Range
Dim cell as Range
set cell = Cells(rows.count,1).End(xlup) ' cell is the last visible cell with a value. Now loop down set cell = cell.offset(1,0) do while cell.EntireRow.Hidden = False set cell = cell.offset(1,0) Loop -- Regards, Tom Ogilvy "Tim" wrote in message ... Hello All, I have a large work sheet with multiple hidden rows. Is there a simple way to identify the last row of data (usually hidden) and select the a cell in the following row. I can do this by unhiding everything finding the end of the data (xlDown), identifing the last row then looping to hide all the appropriate data. I know there must be something easier. thanks |
All times are GMT +1. The time now is 11:11 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com