Rapport de message :*
 

Modification macro

Titre du sujet : Modification macro
par Koni77 le 02/05/2011 06:24:04

Bonjour , je viens solliciter votre aide pour une macro de récupération de données web.
Voilà la macro:
Set O = IE.Document.getElementsByTagName("br")
        For Each OI In O
            If OI.innerText <> " Retour à l'accueil de pmu.fr" Then
                Set OIS = OI.getElementsByTagName("br")
                L = L + 1
                With Cells(L, 1)
                    .Value = OIS.Item(0).innerText
                End With
                With Cells(L, 2)
                    .Value = OIS.Item(1).innerText
                End With
            End If
EDITION PAR LE WEBMASTER :
Merci d'utiliser l'outil mis à votre disposition pour insérer du code VBA dans vos posts !
Prière de ne pas faire de Copier-Coller depuis Word ou autre éditeur externe.


Et je voudrais récupérer le chiffre dans cette partie du code source de la page sachant qu'il y en a 6 a récupérer

7000 €

Je ne sais pas si c'est assez compréhensible =(
Merci d'avance à ceux qui m'aideront ;)