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

Macro SUMPRODUCT

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion schdam
  • Date de début Date de début

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
S

schdam

Guest
Bonjour,

J'ai crée une macro (je suis débutant en macro) mais j'ai un problème avec la longueur de la ligne.
En effet, au bout d'un moment je ne peux plus finir ou complété ma formule car plus rien ne veux s'écrire.
La longueur de ligne des formules est-elle limitée en VBA ? Est-il possible de mettre une formule sur plusieurs lignes ?

Voici ma formule qui bloque :
"=IF(OR(ISERROR(SUMPRODUCT(('[" & Fichier_source & "]" & Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & Fichier_source & "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & Fichier_source & "]" & Onglet_source & "'!R2C17:R65000C17)),AND(RC[-1]=0,(SUMPRODUCT(('[" & Fichier_source & "]" & Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & Fichier_source & "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & Fichier_source & "]" & Onglet_source & "'!R2C17:R65000C17))=0)),"""",SUMPRODUCT(('[" & Fichier_source & "]" & Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & Fichier_source & "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & Fichier_source & "]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & Fichier_source & "]" & Onglet_source & "'!R2C17:R65000C17))"

Merci d'avance pour votre aide. 😉
 
Dernière modification par un modérateur:
Trier par date Trier par votes
Re : Macro SUMPRODUCT

bonjour

tu peux faire des retours à la ligne dans une macro en utilisant les UnderScores _


Code: 
Range("A1") = "=IF(OR(ISERROR(SUMPRODUCT(('[" & Fichier_source & "]" & _
Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & Fichier_source _
& "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & Fichier_source & _
"]" & Onglet_source & "'!R2C17:R65000C17)),AND(RC[-1]=0,(SUMPRODUCT(('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & _
Fichier_source & "]" & Onglet_source & "'!R2C17:R65000C17))=0)),"""",SUMPRODUCT(('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C1:R65000C1=R4C2)*(LEFT('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C10:R65000C10,2)=R5C1)*('[" & _
Fichier_source & "]" & Onglet_source & "'!R2C14:R65000C14=R7C1)*('[" & Fichier_source & _
"]" & Onglet_source & "'!R2C15:R65000C15=RC[-2]),'[" & Fichier_source & "]" & _
Onglet_source & "'!R2C17:R65000C17))"


bon apres midi
MichelXld
 
Vote positif 0 Vote négatif
Re : Macro SUMPRODUCT

OK c'est bon ça marche.

J'avais déjà essayé mais je les avais mis après les parenthèses et dans ce cas cela ne fonctionne pas.

Merci beaucoup.
 
Dernière modification par un modérateur:
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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

C
  • Question Question
CREATION DE PLUSIEURS TCD VBA
2
Réponses
23
Affichages
4 K
Charles78
C
V
  • Question Question
Microsoft 365 Actualisation formule écrite via macro en liaison avec une BBD
Réponses
2
Affichages
2 K
vynmarius
V
M
  • Question Question
XL 2013 Optimisation de code pour une présentation
Réponses
5
Affichages
1 K
Merlin258413
M
K
  • Question Question
Regroupement de colonnes automatisé par macro VBA
Réponses
0
Affichages
3 K
kokosei
K
M
  • Question Question
Macro trop longue
Réponses
6
Affichages
2 K
Tirou
T
  • Question Question
CODE MACRO A MODIFIER ( suite d'un post du 9 mars )
Réponses
7
Affichages
932
Softmama
S
N
  • Question Question
Booster une macro
Réponses
5
Affichages
3 K
Staple1600
J
  • Question Question
Pourquoi ma macro ne marche pas quand je l'éxécute en une macro !
Réponses
7
Affichages
3 K
gilbert_RGI
O
  • Question Question
MACRO - fonction si + recherchev + changement de page
Réponses
0
Affichages
876
ofe89
O
V
  • Question Question
macro - appliquer formule et resultat
Réponses
5
Affichages
2 K
VBA_DEAD
V
I
  • Question Question
ma macro plante le système
Réponses
2
Affichages
1 K
ROGER2327
I
  • Question Question
selectionner une table dans une macro
Réponses
1
Affichages
1 K
Papou-net
J
  • Question Question
Raccourcir la durée d'ouverture et d'enregistrement d'une macro ?
Réponses
3
Affichages
2 K
Compte Supprimé 979
C
  • Question Question
Sumproduct
2 3
Réponses
32
Affichages
6 K
jeanpierre
  • Question Question
Macro .xla (conversion nombre en lettre)
2
Réponses
19
Affichages
78 K
patricktoulon
M
  • Question Question
Macro remplace formule trop longue mais pb temps
Réponses
12
Affichages
2 K
Marion
M
I
  • Question Question
Comment afficher un graph., en construction ou modification, seult a la fin?
Réponses
0
Affichages
1 K
Id_forum
I
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…