Extraction de la colonne "cote" site pmu | ||
---|---|---|
Inscription: 02/08/2012
Messages:
2
Version Excel utilisée: 97, 2003, xp, 2007, 2010 |
Posté le : 02-08-2012 09h53
Bonjour,
J'ai trouvé le fichier Turf.xls très intéressan: http://www.mdf-xlpages.com/modules/ne ... ost_id=5975#forumpost5975 Je m'intéresse à ce fichier pour tenter d'extraire la partie "cotes simples", la dernière colonne Je tente de modifier le code, mais là j'ai un problème pour arriver à extraire cette colonne. Le code modifier ci joint. Les modifications en rouge. ---------------------------- Mon problème est dans la partie If OIP.outerHTML Like "*>9:33*" Then GoTo sautgain ou, je dois indiquer le nom de la colonne donc l'heure de la cote prise. Cet heure change tout le temps. Que faire? (ATTENTION, JE SUIS NULLE ET C'EST PAR DEDUCTION QUE JE DIS QU'IL FAUT EXTRAIRE LE NOM DE LA COLONNE!!!) ----------------------------- 'place le gain total
np = 0
Set IEdoc = IEP.Document
Set OP = IEdoc.getElementsByTagName("span")
For Each OIP In OP
If OIP.outerHTML Like "*class=LpaddingXL*" Then
If OIP.outerHTML Like "*>9:33*" Then GoTo sautgain
np = np + 1
If np <> N Then GoTo sautgain
L = L + 1
With Cells(L, 1)
.Value = "Dernière Côte"
End With
With Cells(L, 2)
.Value = OIP.innerText
.Font.Bold = True
Exit For
'Application.StatusBar = .Value
End With
End If ------------------------------------------------------------------------------ Je encore essayer de chercher. Mon but final c'est ultra-simple. Extraire uniquement pour toutes les courses, le Numéro du cheval et sa cote associé !!! Merci, Corinne |
|
|
Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.
Qui consulte actuellement ce sujet ?
1 Utilisateur(s) anonymes