Re Bonsoir Corinne, Alain, le Forum
Voici un exemple d'utilisation de la Function Min en VBA
Sub UseFunction()
Dim Answer As Double
Dim myRange As Range
Set myRange = Worksheets("Feuil11").Range("A1:C10")
answer = Application.WorksheetFunction.Min(myRange)
MsgBox answer
End Sub
Si celà peut t'aider, par contre pour refaire ta formule, il faudra procéder en plusieurs étapes en VBA
Bonne Soirée
@+Thierry