utilisation fonction excel / .Formula
Bonjour tout le monde !
J'aimerais affecter une formule avec la fonction excel "min" à une cellule. Voici le code que j'ai tapé (je me suis servi de l'aide en ligne) :
Code:
1 2 3 4 5 6 7 8 9
| Sub min()
Dim cel As Range, cel2 As Range, F As Worksheet
Set F = ThisWorkbook.Worksheets("Sheet3")
Set cel = Range(F.Cells(3, 5), F.Cells(7, 5))
Set cel2 = F.Range("E3:E7")
F.Range("A40").Formula = "=min(cel)"
F.Range("A39").Formula = "=min(cel2)"
F.Range("A41").Value = Application.WorksheetFunction.min(cel)
End Sub |
La dernière ligne marche bien, mais celles avec ".Formula" (J'ai fais deux lignes pour savoir si le problème venait du Range) me donne une erreur (#NOM?). Je ne comprend pas pourquoi...