bonjour robert
j'avais oublié de préciser sans api :oops:
il y a pas un truc du genre pour le whshell
j'avais vu ca quelque part mais je le trouve plusCode:do:a=whshell.app.activate:loop until a=true
Version imprimable
bonjour robert
j'avais oublié de préciser sans api :oops:
il y a pas un truc du genre pour le whshell
j'avais vu ca quelque part mais je le trouve plusCode:do:a=whshell.app.activate:loop until a=true
pour l'instant pas mieux mais je cherche!
Code:
1
2
3
4
5
6
7
8
9
10
11
12 Sub test() Pause 2, "s" End Sub Function Pause(Tmp As Integer, Echele As String) Dim maintenant As Date maintenant = Now Do Until DateDiff(Echele, maintenant, Now) > Tmp DoEvents Loop End Function
oui intéressant cette méthode
mais elle est basée sur un temps arbitraire et c'est pas aussi simple mon souhait
alors je souhaiterais une gestion en temps réel c'est a dire basée sur le moment ou la fenêtre est dispos et le document chargé
un peu comme pour IE et son .busy ou .readystate
tu aurais cela dans ta boite a idée magique
merci robert;)
d'autre part mais c'est secondaire
j'ai tenté aussi la méthode "run" de l'object whshell
j'ai un message d'erreur "propriété ou methode non géré par cet object"
pourtant le PDF est bien ouvert ?????????:koi:
Code:
1
2 With CreateObject("WScript.Shell") RETOUR= .exec("""C:\Program Files (x86)\Adobe\Reader 9.0\Reader\AcroRd32.exe""" & " " & """C:\Users\polux\Desktop\exemple.pdf""")