Discussion :

[cedana]

Bonjour.
J'ai un souci avec le code suivant :

Code :

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

1
2
3
 
Cells(i, 7).FormulaArray = _
"=SUM(IF(" & Sheets(i + 8).Name & "!R7C3:R85C3=" & "Ch1" & "," & Sheets(i + 8).Name & "!R7C5:R85C5))"

Alors que celui.ci fonctionne correctement

Code :

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

1
2
Cells(i, 7).FormulaArray = _
"=SUM(IF(" & Sheets(i + 8).Name & "!R7C3:R85C3=" & 7010 & "," & Sheets(i + 8).Name & "!R7C5:R85C5))"

Merci pour votre aide

[jfontaine]

Bonjour,

Qu'est ce que 7010? Une Variable? un nombre pour test?

Ch1 étant de l'alpha, des quotes pour le délimiter serait souhaitable

[Pierre Fauconnier]

Bonjour

Peut-être as-tu des espaces dans le nom de la feuille.

Lorsque tu crées une formule Excel en VBA et que tu utilises un nom de feuille dans la formule, tu as intérêt à toujours encadrer le nom de l'onglet avec les signes '

Dans ton cas, ceci

Code :

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

"=SUM(IF('" & Sheets(i + 8).Name & "'!R7C3:R85C3="...

te permettra peut-être de résoudre le souci...

Pour optimiser, tu pourrais éviter la concaténation

Code :

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

"=SUM(IF(" & Sheets(i + 8).Name & "!R7C3:R85C3=" & "Ch1" & "," &

en utilisant directement la chaine recréée avec l'opérateur &

Code :

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

"=SUM(IF('" & Sheets(i + 8).Name & "'!R7C3:R85C3=Ch1,..." ...

Si ch1 n'est pas l'adresse de la cellule mais la chaine de caractères, tu dois l'encadrer avec des doubles guillemets pour recréer la formule.

Tu aurais intérêt à passer par une chaîne de caractères intermédiaires pour pouvoir vérifier que ce que tu crées sera une formule correcte dans Excel.

Tu peux également t'aider d'Excel pour construire la formule en VBA. Tu la construis dans une cellule Excel et dans la fenêtre d'exécution du VBE, tu affiches la formule. Tu verras alors la syntaxe et le vocabulaire (anglais) à utiliser pour la création de la formule en VBA

[cedana]

Bonjour Pierre et Jfontaine.
Après un bref séjour à la clinique me voilà de retour pour reprendre la discussion. Merci à tous les 2 pour vos réponses. Ch1 est une chaine et 7000 un chiffre qui correspond à un des nombreux codes articles que j'utilise.
Si je tape la formule suivante dans une cellule, ça fonctionne

=SOMME(SI(Janvier!$C$7:$C$85="Ch1";Janvier!$E$7:$E$85)

J' ai 1440 cellules à saisir sur 12 colonnes (une par mois) et 120 lignes (une pour chaque code articles) ; pour me faciliter la tâche j'essaie de creer une macro pour effectuer ce travail fastidieux.
Merci encore.

[cedana]

Re-Bonjour.
Mon problème est résolu, la chaine 'Ch1' doit être écrite comme ceci """Ch1""".
Merci de votre aide.