View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
[email protected] avpendse@gmail.com is offline
external usenet poster
 
Posts: 11
Default Slow Performance Hiding Rows



Iterate through the UsedRange as before then use this to hide all rows
after the UsedRange:
rng = Me.UsedRange.Rows(Me.UsedRange.Rows.Count).Row + 1 & ":" &
65536
Me.Range(rng).RowHeight = 0