Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 [Résolu] Changer FormulaLocal par Evaluate

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

Lone-wolf

XLDnaute Barbatruc
Rebonjour à tous 🙂

J'essai envain de modifier une formule avec SOMMEPROD par Evaluate en suivant les exemples de Jacques Boisgontier , pourriez-vous me donner un coup de pouce s'il vous plaît. Merci d'avance

VB: 
Option Explicit

Sub Somme_Prod()
Dim plage1 As String, plage2 As String, plage3 As String, critere As String, resultat

plage1 = [noms].Address
plage2 = [ccp].Address
plage3 = [bc].Address
critere = [I2]

resultat = Evaluate("Sumproduct((plage1=""" & critere & """)*(plage1 + plage3)")
'[F2].FormulaLocal = "=SOMMEPROD((noms=I2)*1; (ccp)+(bc))"
[F2] = resultat
'With [F2]
'.Value = .Value
'End With
End Sub
 

Pièces jointes

Trier par date Trier par votes
Lone-wolf à dit:
Et en mettant des variables comme dans l'exemple, comment tu écrit evaluate (xxx, xxx, xxx) ?
Cliquez pour agrandir...
Re...
Bien que je ne n'en vois pas l'intérêt avec des plages déjà nommées
Essaye comme ceci
Résultat en G2
Code: 
Sub Somme_Prod()
Dim plage1 As String, plage2 As String, plage3 As String, critere As String, resultat
plage1 = [noms].Address
plage2 = [ccp].Address
plage3 = [bc].Address
critere = [I2].Address
[F2] = [SUMPRODUCT((noms=I2)*(ccp+bc))]
'Ta demande
resultat = Evaluate("SUMPRODUCT((" & plage1 & "=" & critere & ")*(" & plage2 & "+" & plage3 & "))")
[g2] = resultat
End Sub
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re...
Oui, pour les noms définis que je savais matriciel par défaut, mais j'ignorais l'application à VBA.
Faute, certainement d'avoir essayé.
Chose faite maintenant, reste plus qu'à y penser, et çà ....... c'est pas gagné.
Merci.
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Sumproduct
2 3
Réponses
32
Affichages
6 K
jeanpierre
M
[REF] Wiki 4 de MichelXld (Fonctions, Evenements, Dates et calendriers, Flash , Ooo)
Réponses
0
Affichages
35 K
MichelXld
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…