En VB cellule la plus grande

[Fox-core 2001]

Salut @ tous
je suis à la recherche d'une solution qui me permettrait, via un bout de code VBA, pour excel 2000, de copier les cellules d'un tableau, mais je veux allé de la première à celle qui contient le nombre le plus grand. Donc faire un range de A1 à Max.
Merci de votre aide.

 

[Michel_M]

Salut le forum

fox-core

proposition de code à insérer dans ta macro:

Dim maxi

maxi = Application.Max(Range("A:A"))
maxi = Columns(1).Find(maxi, [A1], , , xlByRows).Row
Range(Cells(1, 1), Cells(maxi, 1)).Select
'ou range("A1:A"&maxi).select


A+
Michel