Thread: DisplayHeadings
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Sandy Sandy is offline
external usenet poster
 
Posts: 270
Default DisplayHeadings

I have the following Sub which does the job - however when the section of
code (asterisked) to hide the Row and Column heading runs, all the sheets
(there are 28) are opened in turn causing a lot of screen flicker - is there
any way that the code could be changed to avoid this happening.
Sandy

Sub Hide_Toolbars()

Open_All_Sheets

Application.ScreenUpdating = False
Application.EnableEvents = False

************
For Each sh In Worksheets
sh.Activate
ActiveWindow.DisplayHeadings = False
Next
************
Sheets("Data Input").Select

For Each wksht In Worksheets
With Application
.DisplayFullScreen = False
.DisplayFormulaBar = False
.CommandBars("Worksheet Menu Bar").Enabled = False
.CommandBars("Standard").Visible = False
.CommandBars("Formatting").Visible = False
.CommandBars("Drawing").Visible = False
End With
Next

Lock_All_Sheets

Sheets("Data Input").Select

Application.ScreenUpdating = True
Application.EnableEvents = True

End Sub