Discussion :

[Mickael Scofild]

bonjour à tous;
voilà j'ai une formule Somme dynamique, elle fait la somme d'une cellule sur plusieurs feuilles, la formule marche bien avec un nombre de feuille <30, mais le probleme se pose des que j'ai une trentaine de feuilles dans mon classeur!
le code erreur c'est le 1004
y a t'il une explication et une solution à cela ????

[diude54]

Peux tu mettre ton code pour que l'on voit ce qu tu fais exactement?

[cafeine]

Hello,

si ces onglets sont contigus, tu peux faire la chose suivante

Code :

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

=SOMME(a!B1; b!B1; c!B1 .....; z!B1)

est équivalent à

Code :

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

=SOMME('a:z'!B1)

[Mickael Scofild]

Voici le code simplifié de ce que fait ma formule:

Code :

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

1
2
3
4
5
6
7
8
maFormule = "=Somme("    
 
 For Ctr = Sheets.Count To 1 Step -1
  maFormue = maFormule & Sheets(Ctr).Name & "!" & Sheets(Ctr).Range("E5").Address & ";"
 
Next Ctr
 maFormule = maFormule & ")"
Sheets(1).Range("A1"). FormulaLocal = maFormule

merci.

[mercatog]

Code :

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

Sheets(1).Range("A1").FormulaLocal = "=Somme(" & Sheets(1).Name & ":" & Sheets(Sheets.Count).Name & "!E5)"