Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Bonjour.
Une autre approche. La macro suivante fait la somme sur la ligne 2 des
montant se trouvant en A1 de chaque feuille concernée.
A modifier selon la disposition de tes données et ce que tu souhaites
faire.
Tu trouveras à l'adresse suivante un zip contenant Classeur1.xls (classeur
des feuilles hebdo) et Classeur2.xls, le classeur mensuel :
http://cjoint.com/?gBn7ffhA8O
Sub RecapMensuelle()
Dim Mois, SemDeb As Integer, SemFin As Integer
Workbooks("Classeur2.xls").Activate
Do
Mois = InputBox("entrez le numéro du mois à traiter")
Loop While Not IsNumeric(Mois) Or Mois < 1 Or Mois > 12
Mois = CInt(Mois)
SemDeb = Range("A1").Offset(, Mois - 1)
SemFin = Range("A1").Offset(, Mois) - 1
With Workbooks("Classeur1.xls")
For i = SemDeb To SemFin
[A2].Offset(, Mois - 1) = [A2].Offset(, Mois - 1) _
+ .Sheets("sem" & i).Range("A1")
Next i
End With
End Sub
Cordialement.
Daniel
a écrit dans le message de news:
Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Bonjour.
Une autre approche. La macro suivante fait la somme sur la ligne 2 des
montant se trouvant en A1 de chaque feuille concernée.
A modifier selon la disposition de tes données et ce que tu souhaites
faire.
Tu trouveras à l'adresse suivante un zip contenant Classeur1.xls (classeur
des feuilles hebdo) et Classeur2.xls, le classeur mensuel :
http://cjoint.com/?gBn7ffhA8O
Sub RecapMensuelle()
Dim Mois, SemDeb As Integer, SemFin As Integer
Workbooks("Classeur2.xls").Activate
Do
Mois = InputBox("entrez le numéro du mois à traiter")
Loop While Not IsNumeric(Mois) Or Mois < 1 Or Mois > 12
Mois = CInt(Mois)
SemDeb = Range("A1").Offset(, Mois - 1)
SemFin = Range("A1").Offset(, Mois) - 1
With Workbooks("Classeur1.xls")
For i = SemDeb To SemFin
[A2].Offset(, Mois - 1) = [A2].Offset(, Mois - 1) _
+ .Sheets("sem" & i).Range("A1")
Next i
End With
End Sub
Cordialement.
Daniel
<recherche.quad@gmail.com> a écrit dans le message de news:
1182934647.551897.16810@n60g2000hse.googlegroups.com...
Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Bonjour.
Une autre approche. La macro suivante fait la somme sur la ligne 2 des
montant se trouvant en A1 de chaque feuille concernée.
A modifier selon la disposition de tes données et ce que tu souhaites
faire.
Tu trouveras à l'adresse suivante un zip contenant Classeur1.xls (classeur
des feuilles hebdo) et Classeur2.xls, le classeur mensuel :
http://cjoint.com/?gBn7ffhA8O
Sub RecapMensuelle()
Dim Mois, SemDeb As Integer, SemFin As Integer
Workbooks("Classeur2.xls").Activate
Do
Mois = InputBox("entrez le numéro du mois à traiter")
Loop While Not IsNumeric(Mois) Or Mois < 1 Or Mois > 12
Mois = CInt(Mois)
SemDeb = Range("A1").Offset(, Mois - 1)
SemFin = Range("A1").Offset(, Mois) - 1
With Workbooks("Classeur1.xls")
For i = SemDeb To SemFin
[A2].Offset(, Mois - 1) = [A2].Offset(, Mois - 1) _
+ .Sheets("sem" & i).Range("A1")
Next i
End With
End Sub
Cordialement.
Daniel
a écrit dans le message de news:
Bonjour !
J'ai essayé de faire un titre clair.................raté :-(
J'ai besoin de votre aide.
Je dois faire un classeur qui résume mensuellement un autre classeur
hebdomadaire.....sauf que le nombre de semaines dans chaque mois
change presque tous les ans (sorte de coutume du domaine d'activité).
Donc j'ai une case en haut de chacune de mes colonnes mensuelles du
classeur 2 dans laquelle on indique le nombre de semaines du mois (le
numéro de la première du mois est donc la somme du nb de semaines pour
chaque mois précédent plus 1 ; la dernière est donc la première plus
le nombre de semaines du mois moins 1).
J'ai aussi des onglets "sem 1", "sem 2", ... dans mon classeur 1.
Je dois dans certaines cellules faire la somme du mois précédent
(c'est donc un cumul mensuel) et de 4 ou 5 montants de 4 ou 5 onglets
du classeur 1
--> Pour prendre un exemple clair, il faudra que le classeur deux
donne pour avril (en admettant qu'il y a 4 semaines en avril) la somme
des semaines 13 à 16 ou 14 à 17 suivant qu'on a compté 4 ou 5 semaines
en Mars (9 à 12 ou 9 à 13).
/! Ca me parait un peu compliqué (même si j'espère avoir tort) donc
il faudra peut-être découper le problème en plusieurs morceaux résolus
indépendemment... /!
Donc, à moins que quelqu'un ne trouve une solution rapide, élégante et
efficace immédiatement, je propose qu'on commence par se pencher sur
le découpage qu'on pourrait faire du problème (et donc de la
solution).
Vous en pensez quoi ?
Merci pour l'aide (future) ;-)
Dites-moi si vous avez besoin d'un classeur d'exemple stocké qq part.
Merci pour ton aide, j'apprécie.
Mais j'ai dû mal m'exprimer.
En synthétisant :
J'ai deux classeurs : C1 & C2. C1 a 53 onglets (un par semaine) et C2
un seul.
Dans C2, j'ai des colonnes mensuelles et des cases à remplir avec C1.
Prenons une ligne au hasard ; dans chacune des cellules de cette
ligne, je dois calculer un montant Mi.
Pour chaque case, Mi=M(i-1)+SOMMEi. ----- Sauf en janvier où
M(janvier)=somme(janvier)
Et SOMME est la somme des 4 cases E8 (par exemple) de 4 feuilles de
C1.
LE PROBLEME, c'est SOMMEi car en fonction des années j'aurais besoin
pour certains mois de la somme de 5 E8 et non pas 4.
Voilà. Dis-moi si ça te paraît plus clair.
Merci pour ton aide, j'apprécie.
Mais j'ai dû mal m'exprimer.
En synthétisant :
J'ai deux classeurs : C1 & C2. C1 a 53 onglets (un par semaine) et C2
un seul.
Dans C2, j'ai des colonnes mensuelles et des cases à remplir avec C1.
Prenons une ligne au hasard ; dans chacune des cellules de cette
ligne, je dois calculer un montant Mi.
Pour chaque case, Mi=M(i-1)+SOMMEi. ----- Sauf en janvier où
M(janvier)=somme(janvier)
Et SOMME est la somme des 4 cases E8 (par exemple) de 4 feuilles de
C1.
LE PROBLEME, c'est SOMMEi car en fonction des années j'aurais besoin
pour certains mois de la somme de 5 E8 et non pas 4.
Voilà. Dis-moi si ça te paraît plus clair.
Merci pour ton aide, j'apprécie.
Mais j'ai dû mal m'exprimer.
En synthétisant :
J'ai deux classeurs : C1 & C2. C1 a 53 onglets (un par semaine) et C2
un seul.
Dans C2, j'ai des colonnes mensuelles et des cases à remplir avec C1.
Prenons une ligne au hasard ; dans chacune des cellules de cette
ligne, je dois calculer un montant Mi.
Pour chaque case, Mi=M(i-1)+SOMMEi. ----- Sauf en janvier où
M(janvier)=somme(janvier)
Et SOMME est la somme des 4 cases E8 (par exemple) de 4 feuilles de
C1.
LE PROBLEME, c'est SOMMEi car en fonction des années j'aurais besoin
pour certains mois de la somme de 5 E8 et non pas 4.
Voilà. Dis-moi si ça te paraît plus clair.
FFO> Merci encore mais......non :D
Le nombre de semaines je le connais (enfin la personne qui va utiliser
la feuille le connaît) et je le rentre (manuellement) dans mon
classeur, tout en haut de chaque colonne mensuelle (en I2, K2, M2,
etc).
Ce que je veux c'est que *la somme des cases des différents onglets de
classeur1 change en fonction du nombre de semaines de chaque mois*
(qui change chaque année) qui est précisé en haut de chaque colonne
mensuelle dans classeur2.
FFO> Merci encore mais......non :D
Le nombre de semaines je le connais (enfin la personne qui va utiliser
la feuille le connaît) et je le rentre (manuellement) dans mon
classeur, tout en haut de chaque colonne mensuelle (en I2, K2, M2,
etc).
Ce que je veux c'est que *la somme des cases des différents onglets de
classeur1 change en fonction du nombre de semaines de chaque mois*
(qui change chaque année) qui est précisé en haut de chaque colonne
mensuelle dans classeur2.
FFO> Merci encore mais......non :D
Le nombre de semaines je le connais (enfin la personne qui va utiliser
la feuille le connaît) et je le rentre (manuellement) dans mon
classeur, tout en haut de chaque colonne mensuelle (en I2, K2, M2,
etc).
Ce que je veux c'est que *la somme des cases des différents onglets de
classeur1 change en fonction du nombre de semaines de chaque mois*
(qui change chaque année) qui est précisé en haut de chaque colonne
mensuelle dans classeur2.