Rapport de message :*
 

Re: Extraction de données sur pages web

Titre du sujet : Re: Extraction de données sur pages web
par myDearFriend! le 06/05/2010 18:47:21

Bonsoir Icedarts, le Forum,

Je viens de jeter un oeil sur ton classeur...
Effectivement, les valeurs numériques avec 3 décimales (et seulement celles-ci) sont automatiquement réinjectées avec un format imposé à l'américaine dans lequel la virgule est interprétée comme séparateur des milliers
C'est curieux et je ne vois pas la raison soudaine de cette mauvaise interprétation des données... Mise à jour IE ? Mise à jour Windows ? Changement du Charset de ta page Web qui influencerait le traitement ? Je ne saurais te dire...

Cela dit, voici une nouvelle méthode rustine qui devrait contourner cette nouvelle difficulté :


A la fin de la procédure Traitement()

remplace la ligne :
    .Cells(Lign, Col).Value = TabTemp(L2)
par :
   If IsNumeric(TabTemp(L2)) Then
        .Cells(Lign, Col).Value = CDbl(TabTemp(L2))
    Else
        .Cells(Lign, Col).Value = TabTemp(L2)
    End If

Cordialement,