Discussion :

[Gogia]

Bonjour le forume,

J’ai 24 fichiers nommés BD_equipe_1.xls, BD_equipe_2.xls … BD_equipe_24.xls.
Chaque fichier a l’onglet Recap1. Dans cet onglet il y a un tableau.
J’ai cherché la possibilité de calculer la somme des cellules C4 des touts les 24 fichiers.
La seule solution que j’ai trouvée et la suivante :

Code :

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

=SOMME([BD_equipe_1.xls]Recap1!$C$4+[BD_equipe_2.xls]Recap1!$C$4+...+[BD_equipe_24.xls]Recap1!$C$4)

Si j'utilise cette formule, ça deviendra qqc immense pour additionner 24 fichiers.
Pouvez-vous proposer qqc plus « modeste » ?

Merci d’avance,
Gogia

[Cocotte278]

Bonjour Gogia,

Si tes données sont positionnées de la même façon sur chacune de tes feuilles (cellule C4)

tu peux peut-être essayer de faire :

Code :

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

=SOMME([BD_equipe_1.xls]Recap1:[BD_equipe_24.xls]Recap1!C4)

Pas sûre du tout !!!!

[CodeFacile]

Puisqu'on est sur le forum macros , pourquoi ne pas développer une fontion Somme_Classeur
ex ( je n'ai pas testé)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
public function Somme_Classeur ( ranger_ as string )
dim somme_ as as double
 
for N = 1 to 24
    somme_ = somme_ +  workbooks ("BD_equipe_" & N & ".xls").worksheets  (Recap1).range ( ranger_).value
 
next
 
Somme_Classeur  = somme_
 
end function

Ensuite tu peux utiliser cette fonction comme une fonction personnalisée

[Gogia]

@ Cocotte278
Merci pour ta reponse!
Mais ça ne fonctionne pas. Le résultat obtenue est #NOM.
J'ai essaié de jouer avec le syntax mais sans success.

@CodeFacile
Bonjour ,

Je ne maîtrise pas le VB. Peux-tu preciser ou exactement il faudra mettre le code?

Les plage des données sont C4:F35 , C37:F38 , K4:N35 et K37:N38

Merci,
Gogia

[pijaku]

Bonjour,
Une petite adaptation d'une formule de Bob Phillips :
=SOMMEPROD(N(INDIRECT("[BD_equipe_"&LIGNE(INDIRECT("1:24"))&".xls]Recap1!C4")))

En fait, "[BD_equipe_" & LIGNE( INDIRECT("1:24")) & ".xls]Recap1!C4" est transformé en une matrice :
[BD_equipe_1.xls]Recap1!$C$4;[BD_equipe_2.xls]Recap1!$C$4;[BD_equipe_3.xls]Recap1!$C$4; etc
ou les numéros de BD_equipe_ sont donnés par LIGNE( INDIRECT("1:24"))

Sommeprod traite ensuite la somme.........

[Gogia]

Bonjour Franck,

Si j'ai compris correctement pour 12 fichiers la formulle sera
=SOMMEPROD(N(INDIRECT("[BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]Recap1!C4")))

et pour 24 fichiers
=SOMMEPROD(N(INDIRECT("[BD_equipe_"&LIGNE(INDIRECT("1:24"))&".xls]Recap1!C4")))

C'est correct?

Quand même, j'imagine qui touts les fichiers, dans ce cas-là doivent être dans le même dosier? Ou on peut remplacer
[BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]

par

[F:dossier:Sous-dossier:BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]
Je travaille sur MAC et il faut utiliser : et pas le back-slash

Merci d'avance pour ta clarification!

[pijaku]

Si j'ai compris correctement pour 12 fichiers la formulle sera
=SOMMEPROD(N(INDIRECT("[BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]Recap1!C4")))

et pour 24 fichiers
=SOMMEPROD(N(INDIRECT("[BD_equipe_"&LIGNE(INDIRECT("1:24"))&".xls]Recap1!C4")))

C'est correct?

Oui. Mais je suppose que cela tu as pu le tester...

Quand même, j'imagine que tous les fichiers, dans ce cas-là doivent être dans le même dosier? Ou on peut remplacer
[BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]
par
[F:dossier:Sous-dossier:BD_equipe_"&LIGNE(INDIRECT("1:12"))&".xls]

Hum...
"[F:dossier:Sous-dossier:BD_equipe_" sous entends que tous les fichiers sont dans : "F:dossier:Sous-dossier:" non?
Oui, sans tester, je suis presque sur en affirmant que tous les fichiers, y compris celui dans lequel tu fais la somme doivent être dans le même répertoire.
Je vais essayer un petit test et reviens te voir après...

[Gogia]

J'ai testé, mais ça ne fonctionne pas et la "réponse" est #REF!

Mes fichiers se trouvent dans le même répertoire. La question a été posée pour mieux comprendre quoi il faut faire dans le cas quand ce n'est pas le cas.