trouver la cellule de valeur max

_RV · 3 Mai 2005

salut tout le monde,

j'ai un petit problème qui à priori parait tout bete, mais que je ne parviens pas à résoudre...

je souhaiterai que excel selectionne la cellule de valeur max pour en changer la couleur de fond

j'ai une petite macro qui tourne sur le sujet, sans grand succès

pour chaque colonne, il doit sélectionner la cellule de plus grande valeur dans les lignes 3, 5, 7 et 9, et le cellule qui est juste au-dessus.

pour l'instant j'utilise ce code:

For j = 3 to 9
For i = 5 To 9 Step 2

If Cells(i, j).Value > Cells(i - 2, j).Value Then
Range(Cells(i, j), Cells(i - 1, j)).Select

Else: Range(Cells(2, j), Cells(3, j)).Select

End If
Next

With Selection.Interior
.ColorIndex = 45
.Pattern = xlSolid
End With

Next

mais là si là encore il ne fait référence qu'à la valeur précédente, et pas à toutes les précédentes, comment pourrais-je lui dire de manière simple:

'sélectionne la plus grande'

qqun saurait-il m'aider??

Merci beaucoup,

Hervé.

Hervé · 3 Mai 2005

Bonjour

En reprenant ton code, en ajoutant une valeur 'pivot' :

Public Sub vev()
Dim i As Byte, j As Byte
Dim maximum As Double
Dim maximadresse As String

maximum = Cells(5, 3).Value
For j = 3 To 9
For i = 5 To 9 Step 2

If Cells(i, j).Value > maximum Then
maximum = Cells(i, j).Value
maximadresse = Cells(i, j).Address(0, 0)
End If
Next i
Next j
Range(maximadresse).Select

With Selection.Interior
.ColorIndex = 45
.Pattern = xlSolid
End With
End Sub

Sinon, une autre approche :

Sub Bouton1_QuandClic()
Dim plage As Range
Dim c As Range
Set plage = Union(Range('c5:i5'), Range('c7:i7'), Range('c9:i9'))
plage.Interior.ColorIndex = -4142
Range(plage.Find(Application.WorksheetFunction.Max(plage)).Address(0, 0)).Interior.ColorIndex = 45
End Sub

Salut

_RV · 3 Mai 2005

merci Hervé,

finalement j'y suis parvenu avec ce code:

ValeurMax = WorksheetFunction.Max(valeur1, valeur2, valeur3, valeur4)

For i = 3 To 9 Step 2

If Cells(i, j).Value = ValeurMax Then
Range(Cells(i, j), Cells(i - 1, j)).Select
End If
Next

le tien marchait pas mal aussi, mais je le comprends mal, j'ai dc préféré garder celui que j'ai trouvé, sinon je vais galérer si un jour je dois le modifier, en tous cas merci beaucoup, c'est super sympa!

Hervé. B)

Ez Kurdim · 5 Février 2013

Re : trouver la cellule de valeur max

Bonjour,

Je suis nouvelle ici et je n'sais pas si quelqu'un peut me répondre mais j'ai le même problème avec la valeur maximum.
Seulement, je ne sais pas du tout où insérer les formules que vous avez inscrites.

Je suis débutante avec Excel, si vous pouviez m'aider,

Merci d'avance.

Modeste · 5 Février 2013

Re : trouver la cellule de valeur max

Bonjour Ez Kurdim et bienvenue,

Le mieux serait que tu déposes un fichier (allégé et sans données confidentielles) dans lequel tu préciserais comment les données sont encodées, ce que tu voudrais faire et le problème que tu rencontres!

Pour joindre un fichier, réponds à ce message, clique sur "Aller en mode avancé", puis sur le trombonne, dans la petite barre d'outils.

@+

Ez Kurdim · 5 Février 2013

Re : trouver la cellule de valeur max

Bonjour,

J'ai crée un exemple simple puisque je n'ai pas le droit de divulguer les informations réelles.

Donc, j'aimerais mettre en avant le maximum de chaque ligne en insérant une couleur de remplissage.

Je voudrais le faire pour les deux feuilles 2011 et 2012 et les comparer dans une troisième feuille. Mais je ne sais pas comment faire. Il faudrait que je puisse rapprocher les mois où il y a eu le plus de ventes.

Par exemple, en 2012, il y a eu un maximum de vente de crayons en août alors qu'en 2011, le maximum était en juillet.

Comment faire apparaître automatiquement ces données dans une autre feuille et surtout comment insérer une couleur de remplissage pour le maximum de chaque ligne.

Voilà, c'est à peu près ce dont j'ai besoin.

Désolée si je n'ai pas était suffisamment compréhensible.

Merci d'avance.

R@chid · 5 Février 2013

Re : trouver la cellule de valeur max

Bonjour et Bienvenu sur XLD,
Salut Modeste,
Voir PJ...
@ + +

Modeste · 5 Février 2013

Re : trouver la cellule de valeur max

Bonsoir,
Salut R@chid 🙂

Bon, ben pendant que je rédigeais quelques explications, l'ami R@chid est passé par là 😉
Je laisse donc les explications, puisque le principe que j'explique est celui qui est utilisé dans le fichier proposé.

Bonsoir,

Si tu déposes un fichier au format .xlsx, tu disposes donc d'une version récente (2007 ou 2010) d'Excel. Le fil que tu as "déterré" est ancien et on ne peut donc pas savoir de quelle version tu disposes (tu pourrais renseigner cette info dans ton profil).

Pour colorer le max de chaque ligne, sélectionne, en feuille "2011", la plage B2:M6, puis dans le ruban Accueil, sélectionne la "Mise en Forme Conditionnelle". Choisis "Nouvelle règle" puis "Utiliser une formule pour déterminer ..." et colle la formule suivante dans la zone prévue à cet effet: "=B2=MAX($B2:$M2)"
Utilise ensuite le bouton "Format..." pour choisir ta couleur dans l'onglet "Remplissage". Valide 3 fois avec le bouton OK ... et vérifie que la couleur s'applique bien pour chaque ligne, à la cellule contenant la plus grande valeur.
Recommence la manipulation en feuille "2012" (ou, en sélectionnant la même plage qu'au départ), utilise le pinceau pour "Reproduire la mise en forme" sur l'autre feuille.
Tu noteras au passage (à moins que j'aie la berlue 😉) que le max des ventes de crayons a eu lieu en août, pour les 2 années!?

Pour ta question "Je voudrais le faire pour les deux feuilles 2011 et 2012 et les comparer dans une troisième feuille. Mais je ne sais pas comment faire. Il faudrait que je puisse rapprocher les mois où il y a eu le plus de ventes" il faudrait que tu donnes des précisions supplémentaires: tu veux trouver un système qui affiche, en Feuil3, le max pour chaque article, pour les deux années? Tu souhaites afficher cette info + le nom du mois correspondant? Si c'est le cas, que fait-on si le max, pour un article a été atteint à deux reprises pour la même année?

Bonne soirée à tous et toutes,

Ez Kurdim · 5 Février 2013

Re : trouver la cellule de valeur max

Bonsoir,

Tout d'abord, merci de m'avoir aidé, R@chid et Modeste.

R@chid, les montants des ventes ont complètement été changé dans le fichier. Est-ce que c'est normal ?

Je ne comprend pas non plus comment vous avez fait pour les rajouter dans la troisième feuille. La formule que vous avez inséré me paraît plutôt compliquée. En même temps, j'y connait rien, mais bon. Est-ce que vous avez aussi une formule pour insérer les montants à côté des mois ?

Modeste, j'ai réutilisé votre formule dans mon véritable fichier et elle a marché... au début.
Après, elle n'a plus fonctionné. En fonction de certaines lignes ou de certaines couleurs, la règle n'est pas appliquée. Y'a-t-il un quota pour les règles ou d'autres conditions ? Ou est-ce du au fait que j'ai cliqué sur "Effacer les règles de cette feuille" ? Pourtant, ça fonctionne sur certaines lignes...

En effet, le maximum a bien été atteint en août pour les deux mois. Manque d'attention, je devais le changer.
Dans le cas où le maximum serait atteint deux fois au cours de la même année, il serait intéressant de pouvoir les ajouter tous les deux dans la troisième feuille.

Enfin, j'utilise Excel Starter. C'est pas le plus performant c'est sur mais vu que je me sers essentiellement de Word, je pense pas que ce soit gênant, non ?

Encore merci de vos réponses.

R@chid · 5 Février 2013

Re : trouver la cellule de valeur max

Bonsoir,

R@chid, les montants des ventes ont complètement été changé dans le fichier. Est-ce que c'est normal ?

Je les ai modifié pour marquer la différence...
Tu peux mettre ce que tu veux ça va fonctionner et tu vas voir que la Mfc change aussi avec les nouveaux montants...
@ + +

Ez Kurdim · 11 Février 2013

Re : trouver la cellule de valeur max

Bonjour,

Merci R@chid pour vos indications, je n'ai pas du tout réussi à réutiliser votre formule mais elle m'a énormément guidée.

J'ai utilisé cette formule pour les mois : =INDEX('2011'!B2:M2;EQUIV(MAX('2011'!B8:N8);'2011'!B8:N8;0))
Et ça marche.

Je sais maintenant ce que sont les formules INDEX et EQUIV,

Merci encore.

trouver la cellule de valeur max

_RV

Guest

Hervé

XLDnaute Barbatruc

_RV

XLDnaute Nouveau

Ez Kurdim

XLDnaute Nouveau

Modeste

XLDnaute Barbatruc

Ez Kurdim

XLDnaute Nouveau

Pièces jointes

R@chid

XLDnaute Barbatruc

Pièces jointes

Modeste

XLDnaute Barbatruc

Ez Kurdim

XLDnaute Nouveau

R@chid

XLDnaute Barbatruc

Pièces jointes

Ez Kurdim

XLDnaute Nouveau

Discussions similaires

trouver la cellule de valeur max

_RV

Guest

XLDnaute Barbatruc

XLDnaute Nouveau

XLDnaute Nouveau

XLDnaute Barbatruc

XLDnaute Nouveau

Pièces jointes

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Nouveau

XLDnaute Barbatruc

Pièces jointes

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency