Sub test2()
Set Plage1 = Range("a1:a15")
Dim formule As String
f = 9
d = 1
formule = "=SumProduct((" & Plage1.Address & " <= " & f & ") * (" & Plage1.Address & ">=" & d & "))"
MsgBox Evaluate(formule)
End Sub
Sub test2()
Set Plage1 = Range("a1:a15")
Dim formule As String
f = 9
d = 1
formule = "=SumProduct((" & Plage1.Address & " <= " & f & ") * (" & Plage1.Address & ">=" & d & "))"
MsgBox Evaluate(formule)
End Sub
Hello
variable intermédiaire formule parce que j'aime bien pouvoir tester le contenu de la variable afin de vérifier que j'utilise la bonne syntaxe
mais tu peux t'en passer
la formule attend une adresse de zone (A5:B12), pas la range elle meme.