VBA RIBBON

VBA!

RIBBON

Ribbon é a barra de ferramentas gráfica localizada na parte superior da interface de aplicativos do Microsoft Office (como Word, Excel, PowerPoint, entre outros). É uma característica central dos aplicativos Office, projetada para melhorar a produtividade e a experiência do usuário, agrupando recursos de forma lógica e acessível.

Para cria-la, você precisa baixar o arquivo (OfficeRibbonXEditor-NETFramework.exe) com final.exe no link abaixo.

Office RibbonX Editor é uma ferramenta moderna baseada no .NET Framework que foi desenvolvida como uma alternativa ao Custom UI Editor.

Abra o programa Office Ribbon

Abra a planilha que você deseja mexer pelo programa Office Ribbon

No menu, clique em Insert e em seguida, Excel - A Custom Tab.xml

Será criado uma guia de exemplo, de forma automática. Salve o arquivo.

Agora, qualquer usuário que abrir esta planilha, irá constar esta nova guia personalizada.

Clique aqui para baixar a versão v1.9.0

RIBBON IMAGENS

Opção 1: Utilizar as imagens do próprio office. Abra o arquivo pdf abaixo, e após escolher a imagem que irá utilizar, você irá precisar apenas do nome imageMso

Opção 2: utilizar os ícones. Será necessário efetuar o download das imagens que escolher.

https://icon-icons.com/pt/

https://icons8.com.br/

https://www.flaticon.com/br/

Opção de inserir imagens do computador:

No próprio Ribbon, clique no menu superior em "Insert Icon"

COMO USAR

Ao abrir o Ribbon clique em Insert, Sample XML, Excel A Custom Tab.xml e abra a planilha que deseja.

O primeiro passo é criar a guia, então vamos lá!

id significa o nome que Nome imagem Mso

estou atribuindo nome da guia

Com isso, lá nas guias no topo superior: Arquivo, Página Inicial, Inserir, etc, no final, terá a guia Recrutamento e seleção a partir de agora.

A estrutura será: Nome da Guia --> Grupos --> Nome dos botões

EXEMPLO PRÁTICO

Código deste exemplo completo:

</group>

</tab>

</tabs>

</ribbon>

</customUI>

APÓS CONFIGURAR O CÓDIGO ACIMA...

No Menu superior do Ribbon, clique em "Validate" para garantir que não tenha nenhum erro no código digitado.

Posteriormente, clique em "Generate Callbacks" para que possamos ter um "guia" para o VBA, copie salva, e feche o Ribbon.

Abra a planilha novamente, abra o VBE, insira um módulo, sugiro renomear o nome do módulo para mRibbon para facilitar a manutenção posteriormente caso seja necessário.

Lembrando que tudo que começar com ' significa que é um comentário e o que estiver nesta linha, não será executado.

Copie e cole no módulo criado, o código que o Ribbon gerou anteriormente, e insira a ação do que é para o Excel fazer.

Abaixo constam três exemplos, o primeiro para ir para a guia que chama Início.

O Segundo exemplo, ao clicar no botão Atualizar_Geral, será chamado o módulo Call e o último exemplo, ao clicar no botão inserido, o Excel irá abrir o formulário.

VBA:

'Callback for b_home onAction
Public Sub conSelecionar_Planilha_Inicio(control As IRibbonControl)

Inicio.Select

End Sub

'Callback for b_geral onAction
Public Sub conAtualizar_Geral(control As IRibbonControl)

Call Atualizar_tudo

End Sub

'Callback for b_iniciar_form onAction
Public Sub conIniciar_Form(control As IRibbonControl)

Forms1.Show vbModeless
End Sub

EXEMPLO PRÁTICO 2

Antes de começarmos, veja o resultado:

Ao abrir o Office Ribbon Editor, com a planilha fechada, apague o código que já esta lá, e digite o código abaixo, mas fazendo as edições que deseja.

Exemplo do código inicial, você poderá utilizar como exemplo, ou apagá-lo e seguir o exemplo abaixo (CTRL C +CTRL V)

</tab>




   <tab id="id_diversos" label="Diversos" insertAfterMso="Paste">

<group id="gr_diversos" label="Diversos">

<button id="b_manutencao" size="large" label="manutencao" onAction="Acao_Planilha_MANUTENCAO" imageMso="GroupSmartArtShapes"/>
<separator id="separator6"/>
<button id="b_BASE_COMPL_TOTVS" size="large" label="Totvs" onAction="Acao_Planilha_GERAL_TOTVS" imageMso="InsertBuildingBlocksHeaderGallery"/>
<separator id="separator7"/>
<button id="b_INICIO" size="large" label="Início" onAction="Acao_INICIO" imageMso="ScreenNavigatorBackMenu"/>

   </group>


</tab>



</tabs>

</ribbon>

</customUI>

AN

inscreva-se