Abaixo segue código para desabilitar menu excel tanto do excel 2003 como as mais atualizadas versões de office.
Basta copiar o codigo e colar no vba (alt + f11).
Codigo para Desabilitar Menu Excel 2003 e 2007
_________________________________________________________
VERSÃO 2003
Desabilita
1 2 3 4 5 6 7 8 |
For Each Barras In Application.CommandBars Let Barras.Visible = False ' Desabilita todas as barras do MS Excel. Next |
Habilita
1 2 3 4 5 6 7 8 |
For Each Barras In Application.CommandBars Let Barras.Visible = True ' Re-habilita todos os Menus do MS Excel.Next Next |
_________________________________________________________
VERSÃO 2007
Desabilita
1 2 3 4 5 6 7 8 9 10 |
With Application Let .DisplayFormulaBar = False ' Desabilita o Menu de fórmula. Let .DisplayStatusBar = False ' Desabilita o Menu de Status. Let .DisplayFullScreen = True Let .CommandBars("Full Screen").Visible = False Let .CommandBars("Worksheet Menu Bar").Enabled = False End With |
Habilita
1 2 3 4 5 6 7 8 9 |
With Application Let .DisplayFormulaBar = True ' Re-habilita o Menu de fórmulas. Let .DisplayStatusBar = True ' Re-habilita o Menu de Status. Let .DisplayFullScreen = False Let .CommandBars("Worksheet Menu Bar").Enabled = True End With |
_______________________________________________________