Catégories
Macro VBA Maths & Stats Macros VBA

VBA Max() : macro pour renvoyer la valeur maximale

Partager :

La fonction VBA Max permet de réaliser une macro pour renvoyer la valeur maximale d'une ou plusieurs plages dans Excel.

La fonction Max

La fonction VBA Max suit la syntaxe suivante :

Application.WorksheetFunction.Max(plage1, plage2, ...)

Exemple de macro avec Max

La macro

Sub macro()

Dim Tableau1, Tableau2 As Range
Dim Maxi As Single

Set Tableau1 = Range("A1:A5")
Set Tableau2 = Range("B1:B5")

Maxi = Application.WorksheetFunction.Max(Tableau1, Tableau2)

ActiveCell.Offset(0, 0).FormulaR1C1 = _
Maxi
ActiveCell.Offset(1, 0).Select

End Sub

Les données sources

ABCDE
1-12,242412,2424
222
3-1414
411
52323

Le résultat

ABCDE
1-12,242412,242423
222
3-1414
411
52323