Comment Trouver La Valeur La + Grande Ds Une Colonne

[BASSDINGUE]

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]

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

Bonjour BASSDINGUE,

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

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

@+

 

[BASSDINGUE]

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é]

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

bonjour

a essayer :

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]

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

@+