Presionar teclas en cierto tiempo

[lokoman]

Estos son los códigos de las teclas para el comando SENDKEYS:


Teclca --------------------------- Código
--------------------------------------------------------------
SHIFT ---------------------------- +
CTRL ------------------------------ ^
ALT -------------------------------- %
BACKSPACE ---------------------{BACKSPACE}, {BS}, or {BKSP}
BREAK --------------------------- {BREAK}
CAPS LOCK ----------------------{CAPSLOCK}
DEL or DELETE ----------------- {DELETE} or {DEL}
DOWN ARROW ----------------- {DOWN}
END ------------------------------ {END}
ENTER --------------------------- {ENTER}or ~
ESC ------------------------------ {ESC}
HELP ---------------------------- {HELP}
HOME --------------------------- {HOME}
INS or INSERT ----------------- {INSERT} or {INS}
LEFT ARROW ------------------- {LEFT}
NUM LOCK ---------------------- {NUMLOCK}
PAGE DOWN -------------------- {PGDN}
PAGE UP ------------------------- {PGUP}
PRINT SCREEN ------------------ {PRTSC}
RIGHT ARROW ------------------- {RIGHT}
SCROLL LOCK ------------------- {SCROLLLOCK}
TAB -------------------------- {TAB}
UP ARROW -----------------{UP}
F1 --------------------------- {F1}
F2 --------------------------- {F2}
F3 --------------------------- {F3}
F4 --------------------------- {F4}
F5 --------------------------- {F5}
F6 --------------------------- {F6}
F7 --------------------------- {F7}
F8 --------------------------- {F8}
F9 --------------------------- {F9}
F10 --------------------------- {F10}
F11 --------------------------- {F11}
F12 --------------------------- {F12}
F13 --------------------------- {F13}
F14 --------------------------- {F14}
F15 --------------------------- {F15}
F16 --------------------------- {F16}


Para la combinacion de CTRL + UP:

Código vb:

SENDKEYS "^{UP}"
 

Para que se activen c/cierto tiempo, puedes usar un TIMER, algo así:

Código vb:

Sub Timer ()
   Timer.enabled=true
   Timer.interval=5000 ' 5 segundos
   
   SendKeys "^{UP}"
End Sub
 

Espero que te ayude!