Restricting Toolbars

DavidCoutts · #1 (**permalink**) 02-09-04, 11:36

I am Trying to produce an Excel Workbook for the Web.
but for security reasons we have to hide the path name.

The Problem the user switches the WEB Toolbar on as this gives the complete path.

ive managed to switch off all toolbars bar the menu toolbar by the following code

Code:

Dim cmd As CommandBar
    Dim I As Integer
    
    'Switch off error messages
        Application.DisplayAlerts = False
        
    'check status of command bars then switch off all active comandbars
    For I = Application.CommandBars.Count To 2 Step -1
        If Application.CommandBars(I).Visible = True Then
            Application.CommandBars(I).Visible = False
        End If
    Next I

is there any way i can run this if the user makes a menu choice.
or is there a way of restricting the options of the menu bar

Any Help will be greatfully recieved

David

Smitty · #2 (**permalink**) 02-10-04, 14:50

Code:

Sub HideCommandBars()
    Dim x As CommandBar
        For Each x In Application.CommandBars
        x.Enabled = False
    Next
End Sub

Sub UnHideCommandBars()
    Dim x As CommandBar
        For Each x In Application.CommandBars
        x.Enabled = True
    Next
End Sub

Hope that helps,

Smitty

DavidCoutts · #3 (**permalink**) 02-11-04, 03:44

Thanks Smitty

That was exactly what i was needing

David

Internet Services

Web Development

Digital Marketing

Consumer Tech