recuperation valeur class.name web

Bonjour
j ai une macro que me permet de "Copier/Coller" une page web
je souhaite intègre une boucle du genre "do" qui permet d'attendre que le site est bien charger avant de copier coller

j'utilise pour l'instant ce code, j arrive a trouver la class mais je sais pas comment récupérer la valeur "connect"

le ActiveSheet.Range("A" & Rows.Count).End(xlUp).Offset(1) c'est juste pour voir ce que je récupère

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

'on cr?? notre collection contenant toutes les balises <div> Set coll_Li = IEDoc.getElementsByTagName("div") 'on boucle sur toutes les balises <div> de notre collection   For Each Li In coll_Li   'Si la className de la balise <div> est "progress" If Li.className = "progress" Then ActiveSheet.Range("A" & Rows.Count).End(xlUp).Offset(1) = Li.className 'on quitte ' Exit For End If Next

---

Pièce jointe 455723


merci pour votre aide

Bonjour,
Essaie de remplacer

Code:

---

Li.className

---

par

Code:

---

Li.innerText

---

Et pour voir la valeur que tu récupères, n'hésite pas à placer un espion sur ta variable, et à exécuter ton code en mode pas à pas. C'est souvent plus efficace que d'alimenter des cellules "à l'aveugle".