Discussion :

[setepenre]

Bonjour,
Je cherche à manipuler des objets, comme Internet Explorer par exemple, à partir de VBA.
J'arrive à ouvrir une page avec la commande ci-après

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set O_IE = CreateObject("InternetExplorer.Application")
O_IE.Visible = True
O_IE.navigate ("https://www.site_recherche.html")

Mais après, je n'arrive plus rien à faire. Je voudrais envoyer des touches [TAB], [ENTER], Identifiant, mot de passe.
Mais le problème est de gérer le temps entre le lancement de la commande d'ouverture et l'envoi des touches, car bien sûr il me faut tenir compte du temps d'ouverture de IE qui est complètement aléatoire.

Merci d'avance pour votre aide.

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim O_IE As New InternetExplorer
 
O_IE.Visible = True
O_IE.navigate "http://www.google.co.ma"
 
Do While O_IE.readyState <> READYSTATE_COMPLETE
    DoEvents
Loop
MsgBox "ready"

Coche la référence Microsoft Internet Controls

[fring]

Mais après, je n'arrive plus rien à faire. Je voudrais envoyer des touches [TAB], [ENTER], Identifiant, mot de passe.

Bonjour,
tu as quelques explications sur la manipulation des pages web dans la FAQ --> ICI et notamment : Comment s'authentifier sur un site web via VBA ?

[setepenre]

J'ai recopier les codes que j'ai trouvé sur la FAQ Excel.
J'ai toujours le message d'erreur suivant au moment de la compilation :
"Type défini par l'utilisateur non défini".

???!!!???

NB : Comme indiqué dans la FAQ j'ai activé la référence "Microsoft HTML Objects Library".
Par contre, je ne trouve pas "Microsoft Internet Controls"

[fring]

Fais une recherche sur ton pc de shdocvw.dll
Si tu la trouves, Références --> Parcourir et tu vas sélectionner cette dll
Sinon, tu vas la télécharger sur Google et tu l'insères dans C:\Windows\System32

[setepenre]

Merci. Avec les bonnes réferences activées, ça marche mieux.