J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau.
Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la
feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls]
Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05
.xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10-
07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+
'[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global'
!B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl
obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x
ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07
-05.xls]Global'!B11)
Le probleme c'est que chaque mois, le nom des classeur change.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anonymousA
bonjour,
avec une petite macro ca serait plus simple. Ici en supposant que le classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls et que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on doit rechercher la somme et le classeur réception bien sur. on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls en feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1") .value=0 For each wbk in workbooks if wbk.name<>"toto.xls" then .value=value+wbk.sheets("GLOBAL").range("B11").value next end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls] Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05 ..xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10- 07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+ '[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global' !B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07 -05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
bonjour,
avec une petite macro ca serait plus simple. Ici en supposant que le
classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls et
que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on
suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on
doit rechercher la somme et le classeur réception bien sur.
on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls en
feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1")
.value=0
For each wbk in workbooks
if wbk.name<>"toto.xls" then
.value=value+wbk.sheets("GLOBAL").range("B11").value
next
end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau.
Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la
feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls]
Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05
..xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10-
07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+
'[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global'
!B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl
obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x
ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07
-05.xls]Global'!B11)
Le probleme c'est que chaque mois, le nom des classeur change.
avec une petite macro ca serait plus simple. Ici en supposant que le classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls et que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on doit rechercher la somme et le classeur réception bien sur. on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls en feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1") .value=0 For each wbk in workbooks if wbk.name<>"toto.xls" then .value=value+wbk.sheets("GLOBAL").range("B11").value next end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls] Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05 ..xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10- 07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+ '[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global' !B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07 -05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
Dom
ReBonjour, j'ai ouvert tous mes classeur, cela me donne toujours 0
Dom
"anonymousA" a écrit dans le message de news:
bonjour,
avec une petite macro ca serait plus simple. Ici en supposant que le classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls et
que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on doit rechercher la somme et le classeur réception bien sur. on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls en
feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1") .value=0 For each wbk in workbooks if wbk.name<>"toto.xls" then .value=value+wbk.sheets("GLOBAL").range("B11").value next end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
-05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
ReBonjour,
j'ai ouvert tous mes classeur, cela me donne toujours 0
Dom
"anonymousA" <anonymousA@discussions.microsoft.com> a écrit dans le message
de news: 3773217F-30FB-4EDF-A239-F653E68BC0D6@microsoft.com...
bonjour,
avec une petite macro ca serait plus simple. Ici en supposant que le
classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls
et
que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on
suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on
doit rechercher la somme et le classeur réception bien sur.
on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls
en
feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1")
.value=0
For each wbk in workbooks
if wbk.name<>"toto.xls" then
.value=value+wbk.sheets("GLOBAL").range("B11").value
next
end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de
tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec
les
memes tableau.
Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la
feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que
cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
ReBonjour, j'ai ouvert tous mes classeur, cela me donne toujours 0
Dom
"anonymousA" a écrit dans le message de news:
bonjour,
avec une petite macro ca serait plus simple. Ici en supposant que le classeur qui abritera la somme de toutes cellules B11 s'appelle toto.xls et
que le résultat s'inscrira en feuille tata en cellule A1. Par ailleurs, on suppose aussi que ne sont ouverts à l'instant T QUE les classeurs dont on doit rechercher la somme et le classeur réception bien sur. on notera qu'on efface au début de la proc l'ancienne valeur de toto.xls en
feuille tata cellule A1
with workkbooks("toto.xls").sheets("tata").range("A1") .value=0 For each wbk in workbooks if wbk.name<>"toto.xls" then .value=value+wbk.sheets("GLOBAL").range("B11").value next end with
A+
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
-05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
michdenis
Bonjour Dom,
Dim MaSomme As double Dim Wk As Workbook
For each Wk in workbooks if Wk.name <> ThisWorkbook.name MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11") end if Next Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la cellule B11, il y des façons d'extraire cette valeur sans avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" a écrit dans le message de news: Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls] Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05 .xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10- 07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+ '[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global' !B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07 -05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
Bonjour Dom,
Dim MaSomme As double
Dim Wk As Workbook
For each Wk in workbooks
if Wk.name <> ThisWorkbook.name
MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11")
end if
Next
Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la cellule B11, il y des façons d'extraire cette valeur sans
avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" <dom.v@9online.fr> a écrit dans le message de news: uKDtJarsFHA.3568@TK2MSFTNGP15.phx.gbl...
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau.
Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la
feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls]
Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05
.xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10-
07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+
'[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global'
!B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl
obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x
ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07
-05.xls]Global'!B11)
Le probleme c'est que chaque mois, le nom des classeur change.
For each Wk in workbooks if Wk.name <> ThisWorkbook.name MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11") end if Next Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la cellule B11, il y des façons d'extraire cette valeur sans avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" a écrit dans le message de news: Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.
=SOMME('[31-07-05.xls]Global'!B11+'[01-07-05.xls]Global'!B11+'[03-07-05.xls] Global'!B11+'[04-07-05.xls]Global'!B11+'[05-07-05.xls]Global'!B11+'[06-07-05 .xls]Global'!B11+'[07-07-05.xls]Global'!B11+'[08-07-05.xls]Global'!B11+'[10- 07-05.xls]Global'!B11+'[11-07-05.xls]Global'!B11+'[12-07-05.xls]Global'!B11+ '[13-07-05.xls]Global'!B11+'[15-07-05.xls]Global'!B11+'[18-07-05.xls]Global' !B11+'[19-07-05.xls]Global'!B11+'[20-07-05.xls]Global'!B11+'[21-07-05.xls]Gl obal'!B11+'[22-07-05.xls]Global'!B11+'[25-07-05.xls]Global'!B11+'[26-07-05.x ls]Global'!B11+'[27-07-05.xls]Global'!B11+'[28-07-05.xls]Global'!B11+'[29-07 -05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
Dom
Merci cela fonctionne
Dom
"michdenis" a écrit dans le message de news: #
Bonjour Dom,
Dim MaSomme As double Dim Wk As Workbook
For each Wk in workbooks if Wk.name <> ThisWorkbook.name MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11") end if Next Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la cellule B11, il y des façons d'extraire cette valeur sans
avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" a écrit dans le message de news:
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.
-05.xls]Global'!B11) Le probleme c'est que chaque mois, le nom des classeur change.
Merci de votre aide
Dom
Merci cela fonctionne
Dom
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
#z4urAusFHA.3452@TK2MSFTNGP14.phx.gbl...
Bonjour Dom,
Dim MaSomme As double
Dim Wk As Workbook
For each Wk in workbooks
if Wk.name <> ThisWorkbook.name
MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11")
end if
Next
Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la
cellule B11, il y des façons d'extraire cette valeur sans
avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" <dom.v@9online.fr> a écrit dans le message de news:
uKDtJarsFHA.3568@TK2MSFTNGP15.phx.gbl...
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous
les jours) avec le memes nombre de feuilles, placé au meme endroit avec
les
memes tableau.
Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la
feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela
donne, je voudrais savoir, si il n'y a pas plus court comme formule.
For each Wk in workbooks if Wk.name <> ThisWorkbook.name MaSomme = MaSomme + Wk.Worksheets("Global").Range("B11") end if Next Msgbox MaSomme
Si tu ouvres tous les fichiers seulement pour accéder à la valeur de la cellule B11, il y des façons d'extraire cette valeur sans
avoir reçours à l'ouverture de ces derniers.
Salutations!
"Dom" a écrit dans le message de news:
Bonjour,
J'ai une vingtaine de classeur indentique (ce sont des sauvegarde de tous les jours) avec le memes nombre de feuilles, placé au meme endroit avec les
memes tableau. Ce que je voudrais faire, c'est calculer toutes les cellules B11 de la feuille GLOBAL dans tous les classeurs qui sont ouvert. Voila ce que cela donne, je voudrais savoir, si il n'y a pas plus court comme formule.