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 SingleSet 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).SelectEnd Sub
Les données sources
A | B | C | D | E | |
---|---|---|---|---|---|
1 | -12,2424 | 12,2424 | |||
2 | 2 | 2 | |||
3 | -14 | 14 | |||
4 | 1 | 1 | |||
5 | 23 | 23 |
Le résultat
A | B | C | D | E | |
---|---|---|---|---|---|
1 | -12,2424 | 12,2424 | 23 | ||
2 | 2 | 2 | |||
3 | -14 | 14 | |||
4 | 1 | 1 | |||
5 | 23 | 23 |