Notifications
Clear all

Caixa de Nome/Barra de Fórmulas

2 Posts
1 Usuários
0 Reactions
1,399 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde à todos!

Uso Office 2007 e 2010.
Preciso desabilitar a caixa de nome e barra de fórmulas. Não adianta ser na inicialização porque o usuário vai em Exibição=>Mostrar/Ocultar. Se o usuário tentar exibir apareça um Msgbox e ele não consiga exibir. Sou usuário novo em VBA, tentei:

Sub Macro1()

If Application.DisplayFormulaBar = True Then
MsgBox "Ação não permitida!"
Application.DisplayFormulaBar = False
End If

End Sub

Não deu certo

Obrigado.
Adriano Prachthäuser.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/12/2010 12:44 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Repassando a resposta que encontrei mais simples:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
        ByVal Target As Excel.Range)
        
    Application.DisplayFormulaBar = False
       
End Sub

Cada vez que selecionar uma célula a macro é acionada... Só não achei mais utilidade para isso!! (rs).

Se usarmos a formatação: ";;;" e ocultarmos as fórmulas, com planilha protegida não precisamos esconder essa barra... Caso queiramos esconder o conteúdo da célula, fórmulas, etc...

Atenciosamente,
Adriano Prachthäuser

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2011 12:07 pm