Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Lock all menu tabs
Hi,
It would be a great help if some can suggest a way to lock or hide all menu tabs (like select, copy,cut, inser etc) so that the user can use only command buttons to navigate/perform tasks. |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Lock all menu tabs
Option Explicit
Private mFormulaBar Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = True Next oCB Application.DisplayFormulaBar = mFormulaBar End Sub Private Sub Workbook_Open() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = False Next oCB mFormulaBar = Application.DisplayFormulaBar Application.DisplayFormulaBar = False End Sub 'This is workbook event code. 'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Jithu" wrote in message ... Hi, It would be a great help if some can suggest a way to lock or hide all menu tabs (like select, copy,cut, inser etc) so that the user can use only command buttons to navigate/perform tasks. |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Lock all menu tabs
Tools|options|View and uncheck sheet tabs will hide them
Mike "Jithu" wrote: Hi, It would be a great help if some can suggest a way to lock or hide all menu tabs (like select, copy,cut, inser etc) so that the user can use only command buttons to navigate/perform tasks. |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
Lock all menu tabs
Thanks Bob......Great Job....
"Bob Phillips" wrote: Option Explicit Private mFormulaBar Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = True Next oCB Application.DisplayFormulaBar = mFormulaBar End Sub Private Sub Workbook_Open() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = False Next oCB mFormulaBar = Application.DisplayFormulaBar Application.DisplayFormulaBar = False End Sub 'This is workbook event code. 'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Jithu" wrote in message ... Hi, It would be a great help if some can suggest a way to lock or hide all menu tabs (like select, copy,cut, inser etc) so that the user can use only command buttons to navigate/perform tasks. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do i lock tabs so that only an admin can edit them? | Excel Discussion (Misc queries) | |||
Worksheet tabs as menu? | Excel Discussion (Misc queries) | |||
Missing tabs in Format Cells Menu | Excel Worksheet Functions | |||
Enhancement Request: Give us ability to lock/freeze tabs in Excel | Excel Worksheet Functions | |||
I have no access to the "tabs" on the options menu of excel | Excel Discussion (Misc queries) |