Abra uma
planilha normalmente.
Pressione Alt + F11 para entrar no modo de programação do VBA.
Adicione um formulário


Insira um
rótulo

Adicione um
botão

No rótulo
coloque Olá Mundo e no botão digite Voltar Excel

Dê um duplo
click no botão e digite.
Neste caso ao botão foi dado o nome de CmdSair, mas você poderá dar o nome que
quiser.
Private Sub CmdSair_Click()
Unload Me
Application.Visible = True
End Sub
Dê um duplo click no item EstaPasta_de_trabalho

E digite
Private Sub Workbook_Activate()
Application.Visible = False
UserForm1.Show
End Sub
Salve sua planilha com a extensão xlsm (macro).
|