Comment Trouver La Valeur La + Grande Ds Une Colonne

BASSDINGUE · 29 Juillet 2008

BONJOUR LE FORUM

Donc je veux trouver, en vb ,la valeur la + grande dans un colonne afin de m'en servir en l'incrementant de 1 pour en faire un N) de facture qui sera renvoyé dans un userform.

je suis entrain de m'orienter vers un tri croissant de la colonne pour trouver le dernier n° de cette colonne afin de l'incrementer de 1
Mais je me demande si il n'y a pas plus simple : du style une commande une je connais pas

merci

SergiO · 29 Juillet 2008

Re : Comment Trouver La Valeur La + Grande Ds Une Colonne

Bonjour BASSDINGUE,

Une solution (ex:max de la colonne A):

Code:

Maxi = Application.WorksheetFunction.Max(Range("A1:A65536"))

@+

BASSDINGUE · 30 Juillet 2008

Re : Comment Trouver La Valeur La + Grande Ds Une Colonne

salut sergio,

merci , mais avant de l'utilisé est ce que cela marche si les valeurs sont de type F08 000 ou comment faire pour ne chercher que les 3 dernier chiffre?

Hervé · 30 Juillet 2008

Re : Comment Trouver La Valeur La + Grande Ds Une Colonne

bonjour

a essayer :

Code:

Dim tablo()
Dim i As Long
 
With Range("a65536").End(3)
    ReDim tablo(1 To .Row)
    For i = 1 To .Row
        tablo(i) = Val(Right(Cells(i, 1), 3))
    Next i
End With
 
MsgBox Application.WorksheetFunction.Max(tablo)

il doit y avoir plus simple mais j'ai pas trouvé

bye

Tibo · 30 Juillet 2008

Re : Comment Trouver La Valeur La + Grande Ds Une Colonne

Salut Hervé,

Ce post est un "multi-poste" de Bassdingue.

Jean-Marie a apporté sur l'autre fil une autre solution VBA que je te laisse regarder.

En ce qui me concerne, bien incapable de dire laquelle est la meilleure.

Voir le fil :

https://www.excel-downloads.com/threads/comment-associer-la-fonction-cnum-et-max.101332/

Au plaisir

@+

Comment Trouver La Valeur La + Grande Ds Une Colonne

BASSDINGUE

XLDnaute Occasionnel

SergiO

XLDnaute Accro

BASSDINGUE

XLDnaute Occasionnel

Hervé

XLDnaute Barbatruc

Tibo

XLDnaute Barbatruc

Discussions similaires