Unhiding multiple sheets
I have figured out how to unhide multiple sheets in a workbook - Sub Unhide_All_Sheets() Dim WS As Worksheet For Each WS In ActiveWorkbook.Worksheets WS.Visible = True Next WS End Sub What I am now trying to figure out is a way to make the tabs to appear as the sheets are open, but I am trying to prevent the momentary "jumping" to each sheet.. Is there anything that can be added to this code to prevent that -- Thanks Larry |
Unhiding multiple sheets
Try
Sub Unhide_All_Sheets() Dim WS As Worksheet Application.ScreenUpdating = False For Each WS In ActiveWorkbook.Worksheets WS.Visible = True Next WS Application.ScreenUpdating = True End Sub If this post helps click Yes --------------- Jacob Skaria "Larry Fitch" wrote: I have figured out how to unhide multiple sheets in a workbook - Sub Unhide_All_Sheets() Dim WS As Worksheet For Each WS In ActiveWorkbook.Worksheets WS.Visible = True Next WS End Sub What I am now trying to figure out is a way to make the tabs to appear as the sheets are open, but I am trying to prevent the momentary "jumping" to each sheet.. Is there anything that can be added to this code to prevent that -- Thanks Larry |
Unhiding multiple sheets
Fantastic..
Worked like a charm !!! Thanks so much !! -- Thanks Larry "Jacob Skaria" wrote: Try Sub Unhide_All_Sheets() Dim WS As Worksheet Application.ScreenUpdating = False For Each WS In ActiveWorkbook.Worksheets WS.Visible = True Next WS Application.ScreenUpdating = True End Sub If this post helps click Yes --------------- Jacob Skaria "Larry Fitch" wrote: I have figured out how to unhide multiple sheets in a workbook - Sub Unhide_All_Sheets() Dim WS As Worksheet For Each WS In ActiveWorkbook.Worksheets WS.Visible = True Next WS End Sub What I am now trying to figure out is a way to make the tabs to appear as the sheets are open, but I am trying to prevent the momentary "jumping" to each sheet.. Is there anything that can be added to this code to prevent that -- Thanks Larry |
All times are GMT +1. The time now is 04:04 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com