Views

Histats

Vitrine

VBA Excel - Retirando os menus




Hello Folks!

Para tornar as nossas aplicações mais profissionais e até mesmo impedir que os nossos "queridos usuários" utilizem algumas funcionalidades que não desejamos, costumamos tornar os menus principais das nossas aplicações indisponíveis.

Fazendo isso podemos "protegê-los" (e a nós mesmos) de alguns erros inoportunos.

Dica compartilhada pelo amigo Denis Ostorero (10 Ago 2009)

VERSÃO 2003
For Each Barras In Application.CommandBars
Barras.Visible = True ' Desabilita todas as barras do MS Excel.
Next

Restaurando...
For Each Barras In Application.CommandBars
Barras.Visible = True ' Re-habilita todos os Menus do MS Excel.Next

VERSÃO 2007
With Application
.DisplayFormulaBar = False ' Desabilita o Menu de fórmula.
.DisplayStatusBar = False ' Desabilita o Menu de Status.
.DisplayFullScreen = True
.CommandBars("Full Screen").Visible = False
.CommandBars("Worksheet Menu Bar").Enabled = False
End With

Restaurando...
With Application
.DisplayFormulaBar = True ' Re-habilita o Menu de fórmulas.
.DisplayStatusBar = True ' Re-habilita o Menu de Status.
.DisplayFullScreen = False
.CommandBars("Worksheet Menu Bar").Enabled = True
End With

Referências: Denis Ostero
Tags: VBA, Excel, Menu, Bar, Barra,



LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...