Bonjour,

je travaille sur une macro Excel à destination d'une appli tactile.

pour saisir les champs texte, j'ouvre le clavier virtuel Windows de cette manière

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
 
Private Sub champTexte_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
 
ShellExecute Application.hwnd, "open", "osk.exe", "", "", 1
 
End Sub
Or si le clavier virtuel est déjà lancé, il en ouvre un second ce que je ne souhaite pas.

Merci pour votre aide,

GLMDRX