Discussion :

[vad92]

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 :

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

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

merci pour votre aide

[zenpbb]

Bonjour,
Essaie de remplacer

Code :

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

Li.className

par

Code :

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

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".