Discussion :

[BiggBoy]

Bonjour à tous,

Cela fait 2 jours que je suis bloqués sur une ligne de mon VBA que je n'arrive pas à faire fonctionner. La dernière erreur de que VBA me donne est "Erreur de Compilation: Attendu : séparateur de liste ou ) ".

La ligne en question est la suivante :

If Cells(i, 93) = WorksheetFunction.SumIf(Workbooks("PPG_Suivi GTB_DF_Jan_ 2018 v2 (new version) avec code.xlsx").Worksheets("OPE2").Range(Cells(6, 3), Cells(DernLigneOP2, 3)), Workbooks("PDC-OP2-IP 2018 Fev V2.xlsx").Worksheets("OP2-ABS").Range(Cells(i, 5), Workbooks("PPG_Suivi GTB_DF_Jan_ 2018 v2 (new version) avec code.xlsx").Worksheets("OPE2").Range(Cells(6, 20), Cells(DernLigneOP2, 20))) Then

Pliiize Help. Merci à tous ceux qui s'interesseront à la question.

[mattgui]

Bonjour,

Cela signifie qu'il te manque une parenthèse quelque part ...
Je n'ai pas regarder exactement en détails mais à première vue il t'en manque une à la toute fin, avant ton then, pour fermer ton sumif.

Cdt,

Matt

[BiggBoy]

Bonjour Matt et merci pour ta réponse . J'ai bien vérifier pour les parenthèse c'est bien bon 17 parenthèse ouvrantes et 17 parenthèse fermantes

[Marc-L]

Bonjour,

en créant la formule de calculs directement dans une cellule, quel résultat est retourné ?

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Nigeria, New-York, Mogadicio, Barcelone, London, Manchester, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[mattgui]

Bonjour Matt et merci pour ta réponse . J'ai bien vérifier pour les parenthèse c'est bien bon 17 parenthèse ouvrantes et 17 parenthèse fermantes

On ne doit pas avoir les mêmes yeux :p

Sans compter les parenthèses du Cells avant le égal, j'ai 17 parenthèses ouvrantes et 16 fermantes. Il te manque donc bien une parenthèse pour fermer ton sumif, juste à la fin.

Essaie comme ça ^^

EDIT : Tes 3 parenthèses de fin ferment l'objet Cells et deux objets Range. Donc il te manque bien la fermeture de ton Sumif

[joe.levrai]

Bonjour,

elle est ici la manquante

Code :

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

Workbooks("PDC-OP2-IP 2018 Fev V2.xlsx").Worksheets("OP2-ABS").Range(Cells(i, 5)

il manque la parenthèse fermante de ton Range() .... d'ailleurs tu peux virer Range puisque tu n'as qu'une cellule dedans

[BiggBoy]

Merci et bien vu Joe.

Pb corrigé mais nouvelle erreur : Erreur d'exécution '1004'. Erreur définie par l'application ou par l'objet.

Est ce que vous avez une idée d'où ça peut venir ?