Comment activer l'onglet 2 d'une application IE avec VBA

Bonjour,

Depuis peu, je suis mis a créer des Macros pour remplir automatiquement des formulaire sur IE.
Merci à Quazerty pour son excellent tutoriel, sans lequel je serai encore en train de ramer ;-)

http://qwazerty.developpez.com/tutor...-et-vba-excel/

Cependant, je bloque sur un problème et je suis sûr que l'un d'entre vous pourra me souffler une solution.

Macro réaliser avec Excel 2010 et utilisation IE8

je procède a une authentification sur un site professionnel, puis après un appui sur un lien HyperText, un nouvel onglet contenant un formulaire apparaît.
Dans la suite de mon code je veux travailler sur ce second onglet. Problème !!! je ne connais pas quel commande VBA me permettra de selectionner l'onglet 2
Malheureusement je ne peux joindre la source (liens nécessitant une authentification)

Ne pas hésiter a me solliciter pour plus de détails.

Merci pour vos conseils

bonjour

deja Ie 8 c'est une blague non? si c'est pas une blague passe au moins a IE9

ensuite pour le 2 eme onglet c'est tou simple c'est la page active donc

donc utilise les fonctions que tu semble avoir survolée avec le tuto de qwazerty

pour les gestion d'attente peut etre utiliser un do loop sur le location url pourquoi pas quand on change de page c'est bien pratique

Bonjour PatrckToulon,

C qui me pose problème c'est que Le second onglet s'ouvre mais c'est toujours le premier qui reste actif...
Merci pour le conseils, je vais reprendre le TUTO.

re
je vois
tu trouvera pas cela dans le tuto

fait une recherche dans les contributions vba avec recherche avancée

avec mon identifiant et getobject IE c'est une fonction que j'ai mis au point il y a un petit moment deja elle me permet de naviguer sur toutes les pages web ouvertes


on tiendra la a mon avis une partie de ta solution

reviens si tu comprends pas

Merci PatrickToulon. Je ne connais pas très bien le site.
Du coup je suis désolé mais je n'est pas trouvé :-(

re
Bonjour
voila le lien de la Contribution

Bonne lecture

Bonjour PatrickToulon,

Merci , Vu le code ça a l'air de correspondre a ce qui me faudrait.
Malheureusement il y a un dernier obstacle.

je n'ai pas pu tester. J'ai une erreur VBA lors de l’exécution de la fonction.
L'objet Shell n'est pas reconnu. j'ai essayer avec WshShell et c'est pas mieux :-(

Y a-t-il une référence a ajouter ?

Bonjour
et oui il faut activer une reference

mais il faut lire un peu plus dans la discussion tu te serais appercu que j'avais utiliser le latebinding(declaration tardive) par la suite

teste ceci:

Code:

---

1 2 3 4 5 6 7 8

Function Getobjects() As Object Dim objShell As Object, obj As Object Set objShell = CreateObject("shell.application") For Each obj In objShell.Windows If TypeName(obj.document) = "HTMLDocument" Then msgbox obj.LocationURL   Next obj End Function

---

Ecxel (ent) :D
it works

Merci pour ton aide PatrickToulon.

Bonne journée