dragon576
09-11-2007, 02:37 AM
Hi,
I'm using the following code to ensure only my toolbar is visable on any worksheet .
Private Sub worksheet_activate()
On Error Resume Next
With Application
.DisplayFullScreen = True
.CommandBars("My toolbar").Enabled = True
.CommandBars("Worksheet Menu Bar").Enabled = False
End With
On Error GoTo 0
End Sub
Works fine except the vertical scrollbar is visible and the horizontal is not.
Ideally I need a way to keep both scrollbars, and even the worksheet tabs whilst having main menus/default toolbars hidden. I have been unable to find a properties element for fullscreen except for userforms.
Can anyone help? I've searched for scrollbars and displayfullscreen but have not found an answer yet.
Thanks
Doug
I'm using the following code to ensure only my toolbar is visable on any worksheet .
Private Sub worksheet_activate()
On Error Resume Next
With Application
.DisplayFullScreen = True
.CommandBars("My toolbar").Enabled = True
.CommandBars("Worksheet Menu Bar").Enabled = False
End With
On Error GoTo 0
End Sub
Works fine except the vertical scrollbar is visible and the horizontal is not.
Ideally I need a way to keep both scrollbars, and even the worksheet tabs whilst having main menus/default toolbars hidden. I have been unable to find a properties element for fullscreen except for userforms.
Can anyone help? I've searched for scrollbars and displayfullscreen but have not found an answer yet.
Thanks
Doug