Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

318 Parte IV: Como se Comunicar com Seus Usuários
<customUI xmlns=’http://schemas.microsoft.com/
office/2006/01/customui’>
<ribbon>
<tabs>
<tab idMso=’TabHome’>
<group id=’Group1’ label=’Excel VBA For Dummies’>
<button id=’Button1’
label=’Click Me’
size=’large’
onAction=’ShowMessage’
imageMso=’FileStartWorkflow’ />
</group>
</tab>
</tabs>
</ribbon>
</customUI>
8. Clique o botão Validate na barra de ferramentas. Se o código
tiver quaisquer erros de sintaxe, você receberá uma mensagem
que descreve o problema. Se quaisquer erros forem identificados,
você precisa corrigi-los.
9. Clique o botão Generate Callback.
CustonUI Editor cria um procedimento VBA Sub que é executado
quando o botão é clicado (veja a Figura 19-3). Na verdade, esse
procedimento não é inserido na pasta de trabalho, assim, você
precisa copiá-lo para uso posterior (ou memorizá-lo, se tiver uma
boa memória).
10. Volte para o módulo customUI.xml e escolha File➪Save (ou
clique o ícone Save na barra de ferramentas).
11. Feche o arquivo usando o comando File➪Close.
12. Abra a pasta de trabalho no Excel. Clique na Guia Página Inicial
e você deverá ver um novo grupo na Faixa de Opções e um
botão Ribbon. Mas, ainda não funciona.
13. Pressione Alt+F11 para ativar o VBE.
14. Insira um novo módulo VBA e cole (ou digite) o procedimento
que foi gerado na Etapa 9. Acrescente uma declaração MsgBox,
assim você saberá se o procedimento está, de fato, sendo
executado. O procedimento é:
Sub ShowMessage(control As IribbonControl)
MsgBox “Congrats. You found the new ribbon
command.”
End Sub
15. Pressione Alt+F11 para pular de volta para o Excel. Clique o
novo botão da Faixa de Opções. Se tudo correu bem, você verá a
MsgBox mostrada na Figura 19-4.