Sumproduct et variables

[Goufra]

Bonsoir,
Je vous remercie par avance de bien vouloir me corriger.

Aucun de ces 2 codes fonctionnent
MsgBox Evaluate("=SUMPRODUCT(N(Plage1<=""" & f & """)*(Plage1 >= """ & d & """) ) ")
ou
MsgBox Evaluate("=SUMPRODUCT(N(" & Plage1 & "<=""" & f & """)*(" & Plage1 & " >= """ & d & """) ) ")

Je tourne en rond !
Avec mes vifs remerciements
Goufra

 

[vgendron]

Hello

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

 

[Goufra]

Bonsoir Vgendron,
Je te remercie infiniment.

Puis-je te solliciter encore.
Je souhaiterais comprendre la formule.
Peux-tu m'indiquer un site.

Pourquoi passer par une variable intermédiaire "Formule"
Pourquoi Utiliser Address" au lieu et place de plage1 qui est un "range"

Je te souhaite une très bonne soirée.
JC G

 

[Goufra]

Hello

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

 

[Goufra]

Bonsoir
Merci infiniment pour ta réponse.

Puis-je te solliciter pour m'indiquer un site pourque je puisse comprendre le code.

Pourquoi utiliser
- une variable "formule"
- les références de plage1 [address] qui est un objet range

Je te souhaite une très bonne soirée
JC

 

[vgendron]

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.

 

[Goufra]

Bonsoir vgendron
Avec tous mes rerciements
Voilà une affaire clarifiée.
Bonne soirée
Goufra