Thread: How do you "Unhide" multiple sheets at one time?
View Single Post
  #3   Report Post  
Gord Dibben
 
Posts: n/a
Default
Sub UnHideAllSheets()
Application.ScreenUpdating = False
Dim n As Single
For n = 1 To Sheets.Count
Sheets(n).Visible = True
Next n
Application.ScreenUpdating = True
End Sub


Gord Dibben Excel MVP

On Sat, 25 Dec 2004 13:11:02 -0800, "RPF2407"
wrote:


Reply With QuoteReply With Quote