Microsoft 365 ajouter des flèches au classement

Mat65000 · 20 Septembre 2023

Bonjour à tous,
J'ai besoin d'aide pour réaliser une macro car je ne sais pas faire.
Lorsque je rentre un nouveau score (en "Q4" et "R4" de l'onglet "Général"), j'aimerai rajouter des symboles "flèche" en fonction du classement précédent à côté du rang de chacun (colonne "BK" de l'onglet "Général")
Par exemple, s'il est passé de 3ème à 1er alors une flèche vers le haut, s'il est passé de 3ème à 10ème alors une flèche vers le bas et s'il est toujours à la même place alors une flèche horizontale.
Merci d'avance pour votre aide.
Cdlt
Mathieu

Dudu2 · 31 Octobre 2023

Essaie avec ça pour tous tes tableaux de classement, à condition qu'il soient identiques évidemment.

Mat65000 · 31 Octobre 2023

Dudu2 à dit:
Essaie avec ça pour tous tes tableaux de classement, à condition qu'il soient identiques évidemment.

Je suis entrain de tous les mettre à l'identique dans le visuel que je t'ai fais suivre

Dudu2 · 31 Octobre 2023

Autres questions, est-ce qu'il est possible pour toi, en plus donc des flèches de classements que tu as déjà réalisé, de mettre le nombre de places gagnées ou perdues?

Où veux-tu que cela apparaisse ?
Idéalement dans une colonne dédiée.

Mat65000 · 31 Octobre 2023

Dudu2 à dit:
Où veux-tu que cela apparaisse ?
Idéalement dans une colonne dédiée.

oui dans une colonne à côté des flèches ça serait parfait. Veux tu que j'allège mon excel pour pouvoir te l'envoyer?

Dudu2 · 31 Octobre 2023

oui dans une colonne à côté des flèches ça serait parfait. Veux tu que j'allège mon excel pour pouvoir te l'envoyer?

Pas spécialement. Si les tableaux comportent les colonnes:

VB:

Private Const NomColonneRang = "Rang"
Private Const NomColonneNom = "Noms"
Private Const NomColonneTri = "Points"
Private Const NomColonneÉvolution = "Évolution"
Private Const NomColonneGains = "Gains"

Ça suffit au fonctionnement.
Ces constantes sont éventuellement modifiables pour les ajuster aux noms réels des colonnes.
Je renvoie le fichier avec la colonne gains traitée dans un instant.

Dudu2 · 31 Octobre 2023

Voilà...

Mat65000 · 31 Octobre 2023

Parfait je regarde tout ça

Mat65000 · 31 Octobre 2023

Voici le message qui apparait:

Mat65000 · 31 Octobre 2023

je pense que c'est bon il fallait que je mette "É" pour la colonne "Evolution"

Mat65000 · 31 Octobre 2023

Le seul petit problème qu'il y a c'est que les rangs ne suivent pas. J'ai essayé de les sortir du tableau et de les mettre en chiffres normaux (je pense que c'est la solution) mais forcément tes formules ne marchent plus

Dudu2 · 31 Octobre 2023

je pense que c'est bon il fallait que je mette "É" pour la colonne "Evolution"

Soit tu ajustes le titre, soit tu ajustes la constante qui décrit le titre.
Si la constante est Private Const NomColonneÉvolution = "Évolution", il faut mettre Évolution dans le titre.

Le seul petit problème qu'il y a c'est que les rangs ne suivent pas.

Je ne comprends pas ton problème. Les rangs ne bougent pas car la macro commence par un tri du tableau descendant sur les points. Donc les rangs sont corrects et n'ont pas à bouger.

mais forcément tes formules ne marchent plus

Il n'y a pas de formules. Tout est dans le VBA.

Mat65000 · 31 Octobre 2023

Autant pour moi, ce n'était plus "Ligne()-2" dans mon nouveau tableau mais "Ligne()-6". Ca marche très bien.
Et en effet c'est dans le VBA mais je n'ai pas l'habitude de l'utiliser!
Merci beaucoup pour ton aide c'est top vraiment!

Microsoft 365 ajouter des flèches au classement

Mat65000

XLDnaute Nouveau

Pièces jointes

Dudu2

XLDnaute Barbatruc

Pièces jointes

Mat65000

XLDnaute Nouveau

Dudu2

XLDnaute Barbatruc

Mat65000

XLDnaute Nouveau

Dudu2

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

Pièces jointes

Mat65000

XLDnaute Nouveau

Mat65000

XLDnaute Nouveau

Pièces jointes

Mat65000

XLDnaute Nouveau

Mat65000

XLDnaute Nouveau

Dudu2

XLDnaute Barbatruc

Mat65000

XLDnaute Nouveau

Discussions similaires