Notifications

Clear all

Ocultar Ribbon sem Editar XML

Dicas & Macetes (migrar)

Post Recente por ralf jones 12 anos atrás

8 Posts

4 Usuários

0 Reactions

6,210 Visualizações

RSS

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Topic starter

A dica é simples, fácil, porém pouco conhecida...

veja como ocultar o faixa de opções do excel sem editar diretamente as declaraçoes XML do CustomUI.xml

False para Ocultar

True para restaurar

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

teste na janela imediata

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

Postado : 29/04/2010 3:20 pm

Eron

(@eron)

Posts: 102

Illustrious Member Admin

Boa Adelson!

Eron
CRA/RS 27.563
Administrador Fórum Planilhando

Postado : 23/09/2010 5:40 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Topic starter

Meu amigo Anderson...

Preciso saber como proceder isso no excel pois sei trabalhar nele mas não entendo nada de programação.

Abraço

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

Postado : 14/09/2011 2:21 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Topic starter

Desculpe pelo nome errado Adelson... sou meio desligado mesmo

Desde já agradeço.

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

Postado : 14/09/2011 2:22 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Topic starter

Oi Adelson, beleza?

Seguinte, essa linha de código para ocultar a ribbon mata o Ctrl+C

vc conhece alguma outra opção ?

Valeu

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

Postado : 29/08/2012 8:46 am

robertop

(@robertop)

Posts: 1

New Member

Adelso quando eu aplico este código ele oculta, porém se eu gravar o excel e abrir fica novamente visível.

Tem como ao abrir a planilha já esteja oculto?

Postado : 03/02/2013 12:40 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Topic starter

Boa tarde!!
Use dentro de EstaPasta_de_Trabalho

Private Sub Workbook_Open()
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    Application.DisplayFormulaBar = False
    Application.DisplayStatusBar = Not Application.DisplayStatusBar
    ActiveWindow.DisplayWorkbookTabs = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
    Application.DisplayFormulaBar = True
    Application.DisplayStatusBar = True
    ActiveWindow.DisplayWorkbookTabs = True
End Sub

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

Postado : 03/02/2013 12:57 pm