Avec quelle fonction, trouver le MAXIMUM d'une dizaine de variables
numériques ???

La fonction Max existe pour les formules dans les worksheets , mais pas en
programmation VB !!!!!!!!!!!!!!

Don't know if this is what you're looking for.

Sub maxit()
Dim MaxNum As Integer
MaxNum = Application.WorksheetFunction.Max(Range("A1:A4"))
MsgBox MaxNum
End Sub

Can replace "Range("A1:A4")" With another range or variable

"hexadec" wrote:

Avec quelle fonction, trouver le MAXIMUM d'une dizaine de variables
numériques ???

La fonction Max existe pour les formules dans les worksheets , mais pas en
programmation VB !!!!!!!!!!!!!!

?Application.MAX(range("a1:a12"))

--
Kind regards,

Niek Otten

"hexadec" wrote in message
...
Avec quelle fonction, trouver le MAXIMUM d'une dizaine de variables
numériques ???

La fonction Max existe pour les formules dans les worksheets , mais pas en
programmation VB !!!!!!!!!!!!!!