Forums XLPages

Excel & VBA Forum principal [résolu] Effectuer un suffrage (turf)

Effectuer un suffrage (turf)
#1
XLvisiteur_
Posté le : 13-02-2011 18h11
Bonjour à tous,

Passionné de turf (comme certains d'entre nous), je vous joins un fichier ou je souhaiterais obtenir le nombre de suffrage par position. Un tableau a été créé, à côté des pronostiques de la presse. En col 1, le nombre de suffrage des cité en première position et ainsi de suite jusqu'au 8e. Cette course ne comporte que 17 partants, et le nombre maximum de partants est de 20.

Cette demande avait été faite sur un autre forum depuis une autre source. cette autre source a été remplacée par une image, de ce fait ce n'est plus exploitable.

Avec cette nouvelle source, tout est à refaire.....

Merci pour votre aide.
Pièce jointe:
xls Synthèse de la presse.xls   [ Taille: 15.50 Ko - Téléchargements: 842 ]
Rapport   Haut 

Re: Effectuer un suffrage (turf)
#2
Guy
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 13-02-2011 18h59
Bonjour iso29,

Pourrais-tu préciser la question. Le classeur joint n'est d'aucun secours, il ne porte qu'un tableau creux...

Cordialement,

Guy
Image redimensionnée

2pme
Hors Ligne
 Rapport   Haut 

Re: Effectuer un suffrage (turf)
#3
XLvisiteur_
Posté le : 13-02-2011 19h52
Bonsoir le forum,
Bonsoir Guy et merci pour le précédent fichier.

Sur la gauche, il y a une liste de référence de journaux et une série de chiffres, qui forment les pronostiques de la presse.

Le tableaux est creux effectivement, car la formule est trop complexe pour mes compétences Excel, j'améliorerais l'allure au fichier final.Pas d'inquiétude à avoir.
Pour prendre un exemple, le N°1 de la colonne PMU, doit faire afficher un Zéro en M2 puisqu'il n'est pas cité en première position dans aucun prono. Et on procède ainsi jusqu'au 8e de chaque prono.

En espérant avoir été assez explicite.....

Merci pour votre aide
Rapport   Haut 

Re: Effectuer un suffrage (turf)
#4
Guy
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 13-02-2011 20h15
Bonjour iso29,

Donc, si je comprends bien

Citation :
...la formule est trop complexe pour mes compétences Excel, j'améliorerais l'allure au fichier final.


le présent fil est attende d'informations supplémentaires?

Me trompe-je?

Guy

Image redimensionnée

2pme
Hors Ligne
 Rapport   Haut 

Re: Effectuer un suffrage (turf)
#5
XLvisiteur_
Posté le : 13-02-2011 20h31
Bonsoir Guy,

merci de t'intéresser à mon fichier.

J'abandonne l'idée. je vais procéder autrement.

Cordialement
Rapport   Haut 

Re: Effectuer un suffrage (turf)
#6
myDearFriend!
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 13-02-2011 21h53
Bonsoir Iso29, Guy,

Si j'ai bien compris le problème... Tu trouveras une proposition de traitement en pièce jointe.

N'étant malheureusement pas spécialiste formule, le traitement proposé est réalisé via macro VBA.

J'ai utilisé le code suivant dans un module de code standard :
Option Explicit

Sub Synthese()
' myDearFriend!  www.mdf-xlpages.com
Dim TabTemp As Variant, T As Variant
Dim TResultats(1 To 20, 1 To 8) As Variant
Dim L As Long
Dim Col As Byte
    Raz
    'Charge les données sources dans un tableau variant temporaire
    With Sheets("Feuil1")
        L = .Cells(.Rows.Count, 1).End(xlUp).Row
        TabTemp = .Range(.Cells(1, 1), .Cells(L, 1)).Value
    End With
    'Pour chaque ligne source
    For L = 1 To UBound(TabTemp, 1)
        T = Split(TabTemp(L, 1), Chr(32) & String(2, 160))
        'Incrémenter le tableau de résultat
        For Col = 1 To 8
            TResultats(T(Col), Col) = TResultats(T(Col), Col) + 1
        Next Col
    Next L
    'Afficher les résultats
    Sheets("Feuil1").Range("M2:T21").Value = TResultats
End Sub

Sub Raz()
    Sheets("Feuil1").Range("M2:T21").ClearContents
End Sub

La particularité de tes données (pronos de la presse), c'est qu'elles sont vraisemblablement issues de requêtes externes (sans doute requêtes Web ?) : les numéros de partants sont séparés, non pas de trois caractères espace consécutifs (comme on pourrait le croire), mais d'un caractère espace (code 32) suivi de 2 caractères spéciaux (code 160). Attention donc : cette macro tient compte de cette particularité.

Cordialement,
Pièce jointe:
zip PourIso29.zip   [ Taille: 11.32 Ko - Téléchargements: 816 ]
Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
 Rapport   Haut 


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.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes