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”)