No reason to select:
.Range("1:" & .Cells(.Rows.Count, 6).Row).EntireRow.Hidden = False
In article <B5646456-2331-4671-9C2C-(E-Mail Removed)>,
Stephen <(E-Mail Removed)> wrote:
> Hi Folks,
>
> I can find my last row of data with...
>
> LastRowOfData = .Cells(.Rows.Count, "F").End(xlUp).Row
> For X = 1 To LastRowOfData
>
> But how can I then select rows 1 through LastRowOfData then unhide all at
> once??
>
> -Not that they are all hidden in the firstplace, but I think it would run
> faster then looping through each row and unhiding it if it is hidden.
>
> TIA,
>
> Steve
|