Bonjour,
j'essaye, en vain, de faire fonctionner la séquence suivante pour aider mon fils
qui est handicapé. Quelqu'un a une idée ?
' Déclarations
Public Const vbKeyF7 = 118 'Touche F7
Public Const vbKeyShift = 16 'Touche Shift
Public Const vbKeyEnd = 35 'Touche Fin
Public Const vbKeyControl = 17 'Touche Ctrl
Public Const vbKeyC = 67 'Touche C
Private Declare Sub keybd_event Lib "user32.dll" ( _
ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
' Dans un bouton
.../..
' Séquence [F7] Passage en mode Modification
keybd_event(vbKeyF7, 0, 0, 0)
keybd_event(vbKeyF7, 0, 2, 0)
' Séquence [Shift] + [Fin] pour sélectionner le texte à récupérer
keybd_event(vbKeyShift, 0, 0, 0)
keybd_event(vbKeyEnd, 0, 0, 0)
keybd_event(vbKeyEnd, 0, 2, 0)
keybd_event(vbKeyShift, 0, 2, 0)
' Séquence [Ctrl] + [C] pour copier le texte dans le presse papier
keybd_event(vbKeyControl, 0, 0, 0)
keybd_event(vbKeyC, 0, 0, 0)
keybd_event(vbKeyC, 0, 2, 0)
keybd_event(vbKeyControl, 0, 2, 0)
JM