Bonjour, dans un classeur j'ai une feuille qui recoit sert à recevoir des
informations, cette feuille et vider chaque fin de mois pour pouvoir servir
le mois suivant.
Ma question, je voudrais pouvoir exporter les totaux dans une autre feuille
appelé synthese et que les informations au fil des mois se place en dessous
des totaux du mois précedent.
Explication:
feuille de saisie
Date Entree Payant Non payant Sorties
chaque colonne possède un total
feuille synthese
Mois Entree Payant Non payant Sorties
c'est là que je veux mes totaux pour la première ligne je sais comment faire
mais lorsque la ligne du mois de janvier et complétée comment faire pour que
les résultat aillent s'afficher dans la ligne février, j'espère être assez
clair dans mes explications.
Merci
--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous
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
Daniel
Bonjour. La macro suivante prend la date en A2 de la feuille "Saisie" :
Sub test() Dim DerLigne As Long Sheets("Synthese").Select DerLigne = Range("A65536").End(xlUp).Row + 1 Sheets("Saisie").Select Sheets("Synthese").Range("A" & DerLigne) = Month(Range("A2").Value) Range("B65536").End(xlUp).Resize(, 4).Copy _ Sheets("Synthese").Range("B" & DerLigne) End Sub
Cordialement. Daniel "STEN83" a écrit dans le message de news:
Bonjour, dans un classeur j'ai une feuille qui recoit sert à recevoir des informations, cette feuille et vider chaque fin de mois pour pouvoir servir le mois suivant. Ma question, je voudrais pouvoir exporter les totaux dans une autre feuille appelé synthese et que les informations au fil des mois se place en dessous des totaux du mois précedent. Explication:
feuille de saisie Date Entree Payant Non payant Sorties
chaque colonne possède un total
feuille synthese
Mois Entree Payant Non payant Sorties
c'est là que je veux mes totaux pour la première ligne je sais comment faire mais lorsque la ligne du mois de janvier et complétée comment faire pour que les résultat aillent s'afficher dans la ligne février, j'espère être assez clair dans mes explications. Merci
-- Le partage du savoir contribue à l'amélioration de la condition humaine! Merci à tous
Bonjour.
La macro suivante prend la date en A2 de la feuille "Saisie" :
Sub test()
Dim DerLigne As Long
Sheets("Synthese").Select
DerLigne = Range("A65536").End(xlUp).Row + 1
Sheets("Saisie").Select
Sheets("Synthese").Range("A" & DerLigne) = Month(Range("A2").Value)
Range("B65536").End(xlUp).Resize(, 4).Copy _
Sheets("Synthese").Range("B" & DerLigne)
End Sub
Cordialement.
Daniel
"STEN83" <STEN83@discussions.microsoft.com> a écrit dans le message de news:
22C6BA51-050E-4702-AD43-3F95E7034E99@microsoft.com...
Bonjour, dans un classeur j'ai une feuille qui recoit sert à recevoir des
informations, cette feuille et vider chaque fin de mois pour pouvoir
servir
le mois suivant.
Ma question, je voudrais pouvoir exporter les totaux dans une autre
feuille
appelé synthese et que les informations au fil des mois se place en
dessous
des totaux du mois précedent.
Explication:
feuille de saisie
Date Entree Payant Non payant Sorties
chaque colonne possède un total
feuille synthese
Mois Entree Payant Non payant Sorties
c'est là que je veux mes totaux pour la première ligne je sais comment
faire
mais lorsque la ligne du mois de janvier et complétée comment faire pour
que
les résultat aillent s'afficher dans la ligne février, j'espère être assez
clair dans mes explications.
Merci
--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous
Bonjour. La macro suivante prend la date en A2 de la feuille "Saisie" :
Sub test() Dim DerLigne As Long Sheets("Synthese").Select DerLigne = Range("A65536").End(xlUp).Row + 1 Sheets("Saisie").Select Sheets("Synthese").Range("A" & DerLigne) = Month(Range("A2").Value) Range("B65536").End(xlUp).Resize(, 4).Copy _ Sheets("Synthese").Range("B" & DerLigne) End Sub
Cordialement. Daniel "STEN83" a écrit dans le message de news:
Bonjour, dans un classeur j'ai une feuille qui recoit sert à recevoir des informations, cette feuille et vider chaque fin de mois pour pouvoir servir le mois suivant. Ma question, je voudrais pouvoir exporter les totaux dans une autre feuille appelé synthese et que les informations au fil des mois se place en dessous des totaux du mois précedent. Explication:
feuille de saisie Date Entree Payant Non payant Sorties
chaque colonne possède un total
feuille synthese
Mois Entree Payant Non payant Sorties
c'est là que je veux mes totaux pour la première ligne je sais comment faire mais lorsque la ligne du mois de janvier et complétée comment faire pour que les résultat aillent s'afficher dans la ligne février, j'espère être assez clair dans mes explications. Merci
-- Le partage du savoir contribue à l'amélioration de la condition humaine! Merci à tous
