Discussion :

[kedas]

Salut a tous

J'essaye depuis quelques temps d'adapter une formule excel dans un userform.
Je continue malgré toutes mes tentatives d'obtenir une ERREUR DE COMPILATION Attendu : Fin d'instruction.
Cette erreur est en fait causée par des guillemets dans ma formule:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Etats").Range("D" & b).FormulaLocal = "=SOMMEPROD(('" & TextBox1 & "'!$B$11:$B$65536="Entrée")*('" & TextBox1 & "'!$C$11:$C$65536>=$D$5)*('" & TextBox1 & "'!$C$11:$C$65536<=$H$5)*('" & TextBox1 & "'!$G$11:$G$65536))"

Que faut il faire pour que les guillemets soient intégrer dans ma formule finale ?

Merci d'avance pour tous vos conseils

[Gorfael]

Salut kedas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Etats").Range("D" & b).FormulaLocal = "=SOMMEPROD(('" & TextBox1 & "'!$B$11:$B$65536=""Entrée"")*('" & TextBox1 & "'!$C$11:$C$65536>=$D$5)*('" & TextBox1 & "'!$C$11:$C$65536<=$H$5)*('" & TextBox1 & "'!$G$11:$G$65536))"

A+

[kedas]

Merci Gorfael

Desolé pour le retard
Tout fonctionne comme prevu

A+