R
ricoricK
Guest
Bonsoir à toutes et tous meilleurs vœux
Je ne sais pas s'il y a du monde ce soir
voila, j'ai juste un petit pb la fonction ci dessous me permet de trouver , les 50 plus grandes valeurs dans une plage.
je souhaiterai obtenir l'inverse les 50 plus petites valeurs,mais je ne connais pas l'inverse de la fonction Large()
si quelqu'un a une idée ,ou un autre code dans mon cas je prends, et merci d'avance.
Sub Max()
Dim i As Integer
Dim ValMax(1 To 50) As Long
Dim totalmax As Long
plage de recherche
Range("A1:A50").Select
For i = LBound(ValMax) To UBound(ValMax)
ValMax(i) = Application.WorksheetFunction.Large(Selection, i)
MsgBox ValMax(i)
Next
i
End Sub
Je ne sais pas s'il y a du monde ce soir
voila, j'ai juste un petit pb la fonction ci dessous me permet de trouver , les 50 plus grandes valeurs dans une plage.
je souhaiterai obtenir l'inverse les 50 plus petites valeurs,mais je ne connais pas l'inverse de la fonction Large()
si quelqu'un a une idée ,ou un autre code dans mon cas je prends, et merci d'avance.
Sub Max()
Dim i As Integer
Dim ValMax(1 To 50) As Long
Dim totalmax As Long
plage de recherche
Range("A1:A50").Select
For i = LBound(ValMax) To UBound(ValMax)
ValMax(i) = Application.WorksheetFunction.Large(Selection, i)
MsgBox ValMax(i)
Next
i
End Sub
