Excel - Bloquear definitivamente a barra de ferramentas TABELA.

Question

Prezados,

Por favor, alguém poderia me ajudar? Eu preciso saber se é possível bloquear definitivamente a barra de ferramentas tabela.

Já tentei ocultar as faixas de opções, porém mesmo assim quando eu clico na tabela, a bendita barra de ferramentas insiste em aparecer. Observem na imagem abaixo.

Existe alguma forma de "barrar" esse aparecimento mesmo clicando na tela que está na minha planilha?

Desde já agradeço pela atenção de todos.

Answer 1

O mais certo, creio que é inserir a macro em diversos eventos da pasta de trabalho, incluindo também o Deactivate, Before_Close e o Activate. O código ficaria:

Private Sub Workbook_Activate()

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

End Sub

Private Sub Workbook_Deactivate()

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

End Sub

Private Sub Workbook_Open()

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

End Sub

Pois assim, você não some com a faixa de opções para outros eventuais arquivos que estiverem aberto simultaneamente com o arquivo que quer que desapareça a barra.

Abraços!

Answer 2

Olá Marco!

Desconheço uma maneira de bloquear especificamente esta opção.

O que posso te sugerir é utilizar um código que oculte toda a faixa de opções do Excel, dessa forma o usuário não terá acesso a nenhuma opção, se é esta a sua necessidade.

Uma opção de código para ocultar e voltar com a faixa de opções:

'Para ocultar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

'Para retornar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

Abraços!

Answer 3

Olá Marco!

Desconheço uma maneira de bloquear especificamente esta opção.

O que posso te sugerir é utilizar um código que oculte toda a faixa de opções do Excel, dessa forma o usuário não terá acesso a nenhuma opção, se é esta a sua necessidade.

Uma opção de código para ocultar e voltar com a faixa de opções:

'Para ocultar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

'Para retornar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

Abraços!

Olá Marco!

Desconheço uma maneira de bloquear especificamente esta opção.

O que posso te sugerir é utilizar um código que oculte toda a faixa de opções do Excel, dessa forma o usuário não terá acesso a nenhuma opção, se é esta a sua necessidade.

Uma opção de código para ocultar e voltar com a faixa de opções:

'Para ocultar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

'Para retornar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

Abraços!

Rafael, 

Muito obrigado pelo retorno.

Essa macro deu certo (ocultou a barra de ferramentas), porém se eu fechar e abrir novamente a planilha a macro não funciona, ela volta a barra de ferramentas.

Tem como inserir um código para executar essa macro ao abrir a planilha?

Exemplo: quando o usuário abrir a planilha, a faixa de opções vai estar oculta.

Desde já agradeço pela sua atenção.

Atenciosamente,

Marco

Olá, eu consegui uma macro para criar o que eu estou precisando.

Segue o código abaixo:

Private Sub Workbook_Open()

    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

    Application.DisplayFormulaBar = False

    Application.DisplayStatusBar = Not Application.DisplayStatusBar

    ActiveWindow.DisplayWorkbookTabs = False

End Sub

Muito obrigado Rafael, eu agradeço pela sua atenção.

Atenciosamente,

Marco

Answer 4

Olá Marco!

Desconheço uma maneira de bloquear especificamente esta opção.

O que posso te sugerir é utilizar um código que oculte toda a faixa de opções do Excel, dessa forma o usuário não terá acesso a nenhuma opção, se é esta a sua necessidade.

Uma opção de código para ocultar e voltar com a faixa de opções:

'Para ocultar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

'Para retornar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

Abraços!

Olá Marco!

Desconheço uma maneira de bloquear especificamente esta opção.

O que posso te sugerir é utilizar um código que oculte toda a faixa de opções do Excel, dessa forma o usuário não terá acesso a nenhuma opção, se é esta a sua necessidade.

Uma opção de código para ocultar e voltar com a faixa de opções:

'Para ocultar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

Application.DisplayFormulaBar = False

'Para retornar

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

Application.DisplayFormulaBar = True

Abraços!

Rafael, 

Muito obrigado pelo retorno.

Essa macro deu certo (ocultou a barra de ferramentas), porém se eu fechar e abrir novamente a planilha a macro não funciona, ela volta a barra de ferramentas.

Tem como inserir um código para executar essa macro ao abrir a planilha?

Exemplo: quando o usuário abrir a planilha, a faixa de opções vai estar oculta.

Desde já agradeço pela sua atenção.

Atenciosamente,

Marco