Bom dia, Pdbbarros, bem vindo.
Achei estranho quando vc disse que
...Eu coloquei o atalho CTRL + Ç para chamar o form.De início deu certo, porém, do nada, o atalho parou de funcionar...
Na verdade não era prá funcionar nem de início rsrsr. Isso porque só são aceitas como teclas de atalho as letras a..z (ou A..Z). Até mesmo os números são rejeitados (dá mensagem "Erro em tempo de execução 1004: A tecla de atalho deve ser uma letra"), bem como teclas de função, de controle, pontuação, etc.
Embora possamos argumentar que o cê-cedilha seja também uma letra, ele está disponível como uma tecla independente somente em teclados das línguas francesa, portuguesa, espanhola e italiana. Em outros só se consegue com uma combinação de teclas. É interessante que o Excel até aceita a entrada do Ç como tecla de atalho, mas ela não funciona como esperado. Em linhas gerais, acho importante, sempre que possível, evitar o uso de acentuação, sinais diacríticos ou símbolos latinos especiais quando se trata de algum desenvolvimento relacionado à programação, pois assim pode-se evitar comportamentos imprevisíveis.
Então, recomendaria a você que use uma letra de a a z, de preferência até minúscula, não acentuada, que vai funcionar. (Obs.: se quiser pode até usar maiúscula, por exemplo "A", mas na hora que for usar o atalho tem que usar Ctrl + Shift A ao invés de somente Ctrl + A, mesmo que CapsLock esteja On, caso contrário o Excel irá usar o atalho pré-definido para a tecla, no caso do Ctrl + "A" abre a janela Arquivo>Abrir).
Pode inclusive fazer um teste, rode a primeira macro (DefineAtalho), vá no Excel e use a tecla de atalho. Depois mude ShortcutKey para "ç" e veja que nada acontece:
Sub DefineAtalho()
'Assim Funciona. Trocando por "ç" deixa de funcionar
Application.MacroOptions Macro:="TesteAtalho", HasShortcutKey:=True, ShortcutKey:="a"
End Sub
Sub TesteAtalho()
MsgBox "Deu Certo!"
End Sub
Postado : 01/11/2016 6:44 am