Tempo de leitura: 2 minutos
Sendkeys Metodo Excel VBA
Método Application.SendKeys (Excel)
Envia pressionamentos de teclas para o aplicativo ativo.
Exemplo de Macro
Neste exemplo, SendKeys “% ie ~” é como os atalhos manuais para:
pressione Alt e digite I (para abrir o menu Inserir),
então digite E (para selecionar o comando Editar),
e então pressione a tecla Enter, para selecionar esse comando
Sub sbx_comentarios_editar()
Dim wComentario As Comment
Set wComentario = ActiveCell.Comment
If wComentario Is Nothing Then
ActiveCell.AddComment text:=””
End If
SendKeys “%ie~”
End Sub
Sintaxe:
expressão . SendKeys( Keys, Wait )
expressão Uma variável que representa um objeto Application.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
| Keys | Obrigatório | Variant | A tecla ou a combinação de teclas que você deseja enviar para o aplicativo, como texto. |
| Wait | Opcional | Variant | True para fazer o Microsoft Excel aguardar pelo processamento das teclas antes do retorno do controle para a macro. False (ou omitido) para continuar a executar a macro sem aguardar que as teclas sejam processadas. |
Comentários
Este método posiciona pressionamentos de teclas em um buffer de teclas. Em alguns casos, você deverá chamar esse método antes de chamar o método que usará os pressionamentos de teclas. Por exemplo, para enviar uma senha para uma caixa de diálogo, você deverá chamar o método SendKeys antes de exibir a caixa de diálogo.
O argumento Keys pode especificar qualquer tecla única ou qualquer tecla combinada com ALT, CTRL ou SHIFT (ou qualquer combinação dessas teclas). Cada tecla é representada por um ou mais caracteres, como “a” para o caractere a, ou “{ENTER}” para a tecla ENTER.
Para especificar os caracteres que não serão exibidos quando você pressionar a tecla correspondente (por exemplo, ENTER ou TAB), use os códigos listados na tabela a seguir. Cada código da tabela representa uma tecla no teclado.
| Tecla | Código |
| BACKSPACE | {BACKSPACE} ou {BS} |
| BREAK | {BREAK} |
| CAPS LOCK | {CAPSLOCK} |
| CLEAR | {CLEAR} |
| DELETE ou DEL | {DELETE} ou {DEL} |
| SETA PARA BAIXO | {DOWN} |
| END | {END} |
| ENTER (teclado numérico) | {ENTER} |
| ENTER | ~ (til) |
| ESC | {ESCAPE} or {ESC} |
| AJUDA | {HELP} |
| HOME | {HOME} |
| INS | {INSERT} |
| SETA PARA A ESQUERDA | {LEFT} |
| NUM LOCK | {NUMLOCK} |
| PAGE DOWN | {PGDN} |
| PAGE UP | {PGUP} |
| RETURN | {RETURN} |
| SETA PARA A DIREITA | {RIGHT} |
| SCROLL LOCK | {SCROLLLOCK} |
| TAB | {TAB} |
| SETA PARA CIMA | {UP} |
| F1 a F15 | {F1} a {F15} |
Você também pode especificar teclas combinadas com SHIFT e/ou CTRL e/ou ALT. Para especificar uma tecla combinada com outra tecla ou teclas, use a tabela a seguir.
| Para combinar uma tecla a | Preceda o código da tecla com |
| SHIFT | + (sinal de mais) |
| CTRL | ^ (circunflexo) |
| ALT | % (sinal de porcentagem) |
Exemplo
Este exemplo usa o método SendKeys para sair do Microsoft Excel.
Application.SendKeys(“%fx”)
