lancement par shell

gilbert_RGI

XLDnaute Barbatruc
Bonjour

quand je fais
Code:
Sub calculette()
calc = Shell("C:\WINDOWS\system32\CALC.EXE", 1)
AppActivate calc
End Sub

j'ai bien la calculette en écran mais quand je fais

Code:
Sub claviervisuel()
'ouverture du clavier virtuel
clavier = Shell("C:\Windows\System32\OSK.exe", 1)
AppActivate clavier
End Sub
impossible d'avoir le clavier virtuel
OSK est bien présent

Merci de vos suggestions

RGI
 

Roland_M

XLDnaute Barbatruc
Re : lancement par shell

re

taper F1 pour l'aide
dans recherche entrer "clavier virtuel"
dans le résultat de la recherche apparaît:
Vue d'ensemble du clavier virtuel (cliquer dessus)
à droite la fenêtre d'explication apparaît
dans cette fenêtre il y a un peu plus bas
Ouvrez "Clavier virtuel"
cliquer dessus, la clavier doit apparaître !

Roland
 

gilbert_RGI

XLDnaute Barbatruc
Re : lancement par shell

Bonjour

Merci Roland le clavier apparait bien de cette façon

je mets un fichier qui fonctionne sous excel2003 et Windows XP
mais qui me cause problème sous excel2007 et windows Vista

pouvez vous me dire s'il fonctionne chez vous

Cordialement

RGI
 

Pièces jointes

  • clavier_visuel.xls
    40 KB · Affichages: 101

Discussions similaires

Statistiques des forums

Discussions
315 128
Messages
2 116 551
Membres
112 780
dernier inscrit
mmohabs