Discussion :

[redstoff]

bonjour,

je cherche une commande afin de connaitre l'adresse de la fonction grande valeur d'excel

je sais que grande valeur en VB est .large()

mais pas moyen d'en obtenir l'adresse meme avec un .large().address

si quelqu'un a une solution.

merci

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With Sheets("Sheet1") 'Adapter
    MsgBox .UsedRange.Find(Application.Large(.UsedRange, 1)).Address
End With

[redstoff]

bonjour,

désolé je n'étais pas sur le pc pour répondre. je vins de prendre connaissance de ta réponse et je je ne pense pas quelle fonctionne comme je le souhaiterai car si je lui demande de me donner l'adresse de la grande.valeur 3 qui est identique à la grande.valeur 2 il me donnera l'adresse de la 2 et non de la 3.

[pgz]

Bonsoir.

Je pense qu'il n'est pas possible d'avoir la 3ème GRANDE.VALEUR égale ) la 2ème. Dans ce cas les 2 cellules contiennent la même 2ème GRANDE.VALEUR.
Par contre il est possible qu'une même valeur soit dans plusieurs cellules.
Si c'est ce cas qui te gêne, précise ce que tu veux dans cette circonstance, car pour l'instant Mercatog a répondu aussi précisément qu'il était possible.

Cordialement

PGZ

[redstoff]

bonjour,

désolé je me suis mal exprimé. Donc oui, dans le cas où la 3 grande valeur est égale à la deuxième grande valeur, je souhaiterai une commande qui me permette de différencier les 2 car je dois faire un récapitulatif.

si une commande excel existe je ne suis pas contre pour la connaitre.
j'ai testé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=rechercheV(grande.valeur(b1:b10;3);a1:b10;1)

mais ça ne marche pas

[redstoff]

bon je me suis trouvé une solution.

ce n'est pas très jolie mais c'est fonctionnelle.

je la pose pour ceux qui cherche une solution similaire

cette commande est pour les 5 premières grandes valeurs

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
For l = 15 To 65536   'l est pour le nombre de ligne de la matrice de recherche                               moi ça commen de la ligne 15 à 65536
        For c = 0 To 11  'c pour est le nombre de colonne de la matrice de recherche
            cell = Cells(l, 5 + c).Address 'le 5 est pour le numéro de la colonne où commence la matrice de recherche
            If Cells(l, 5 + c) = Application.WorksheetFunction.Large(Range("e15:p65536"), 1) Then
                adresse1 = Cells(l, 5 + c)
            End If
 
            If Cells(l, 5 + c) = Application.WorksheetFunction.Large(Range("e15:p65536"), 2) Then
                adresse2 = Cells(l, 5 + c)
            End If
 
            If Cells(l, 5 + c) = Application.WorksheetFunction.Large(Range("e15:p65536"), 3) Then
                adresse3 = Cells(l, 5 + c)
            End If
 
            If Cells(l, 5 + c) = Application.WorksheetFunction.Large(Range("e15:p65536"), 4) Then
                adresse4 = Cells(l, 5 + c)
            End If
 
            If Cells(l, 5 + c) = Application.WorksheetFunction.Large(Range("e15:p65536"), 5) Then
                adresse5 = Cells(l, 5 + c)
            End If
            If Range("aa2") <> "" And Range("aa3") <> "" And Range("aa4") <> "" And Range("aa5") <> "" And Range("aa6") <> "" Then
                GoTo fin
            End If
        Next c
    Next l

en gros, ça analyse toutes les cases et regarde si elle est ou pas la grande valeur souhaitée.
si vous voulez des précisions, n’hésitez pas à demander^^