Sous totaux

Fred0o

XLDnaute Barbatruc

• 1 Avril 2010

• #2

Re : Sous totaux

Bonsoir Arpette,

Tu peux essayer ceci pour la colonne A :

Code:

Sub Sous_Total()
    Cells([A1].End(xlDown).Row + 1, 1) = WorksheetFunction.Sum(Range(Cells(1, 1), Cells([A1].End(xlDown).Row, 1)))
    Range(Cells(1, 1), Cells([A1].End(xlDown).Row - 1, 1)).EntireRow.Delete
End Sub

A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 1 Avril 2010

• #3

Re : Sous totaux

Fred0o à dit:

Bonsoir Arpette,

Tu peux essayer ceci pour la colonne A :

Code:

Sub Sous_Total()
    Cells([A1].End(xlDown).Row + 1, 1) = WorksheetFunction.Sum(Range(Cells(1, 1), Cells([A1].End(xlDown).Row, 1)))
    Range(Cells(1, 1), Cells([A1].End(xlDown).Row - 1, 1)).EntireRow.Delete
End Sub

A+

Cliquez pour agrandir...

Merci Fred0o,
Cela ressemble à ce que je veux, mais le problème c'est que j'ai un bouton qui valide l'ensemble de ma macro et avec ce que tu me propose je n'ai plus rien. Je te joints mon fichier, je veux les sous-totaux sur la colonne B.
Merci pour ton aide

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 1 Avril 2010

• #4

Re : Sous totaux

Re-bonsoir,

Peux-tu mettre le fichier STP ?
Il est important de préciser clairement sa demande dès le début pour éviter les incompréhensions.

A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 1 Avril 2010

• #5

Re : Sous totaux

Fred0o à dit:

Re-bonsoir,

Peux-tu mettre le fichier STP ?
Il est important de préciser clairement sa demande dès le début pour éviter les incompréhensions.

A+

Cliquez pour agrandir...

Je t'ai mis les 2 fichiers, mais je pense ne pas bien savoir faire pour te les envoyer ?
Parcourir...
Parcourir... et après je fais comment ?
Merci de ton aide

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 1 Avril 2010

• #6

Re : Sous totaux

Re-bonsoir,

Tu zippes les fichiers. Ensuite, dans le forum tu cliques sur "Aller en mode avancé" au bas de cette page. Puis tu cliques sur "Gérer les pièces jointes". Ensuite, tu ajoutes les fichiers zippés puis tu cliques sur "Envoyer" et pour finir tu postes ton message.

A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 1 Avril 2010

• #7

Re : Sous totaux

Ok' c'est fait tu as reçu quelque chose ?

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 1 Avril 2010

• #8

Re : Sous totaux

Re-bonsoir,

Ben non !

Les fichiers doivent se retrouver dans ton post !

Après avoir cliqué sur "Envoyer" pour les fichiers, vérifie que tu n'a pas un message sur la taille maxi de ce style dans la fenêtre d'envoi des fichiers :

Fichier essai.xls:
Votre fichier de 323,0 Ko octets dépasse la limite du forum de 48,8 Ko pour ce type de fichier.

Ajouter un fichier à partir de votre ordinateur​

Sinon, c'est que tes fichiers sont trop gros, donc il faut utiliser
A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 1 Avril 2010

• #9

Re : Sous totaux

Je ne comprends pas mes fichiers font 60+40 ko. Je retente

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 1 Avril 2010

• #10

Re : Sous totaux

Bonne nuit Fed0o, à demain, je vais me coucher

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 1 Avril 2010

• #11

Re : Sous totaux

Re-bonsoir,

Voici un petit mode opératoire détaillé :

Cijoint.fr - Service gratuit de dépôt de fichiers

Suis-le pour poster des fichiers.

A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 2 Avril 2010

• #12

Re : Sous totaux

Fred0o à dit:

Re-bonsoir,

Voici un petit mode opératoire détaillé :

Cijoint.fr - Service gratuit de dépôt de fichiers

Suis-le pour poster des fichiers.

A+

Cliquez pour agrandir...

Merci Fred0o, c'est bien pratique

Cijoint.fr - Service gratuit de dépôt de fichiers
Cijoint.fr - Service gratuit de dépôt de fichiers

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 3 Avril 2010

• #13

Re : Sous totaux

Bonjour Fred0o, tu as reçu les liens pour mes fichiers ?
A+

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 3 Avril 2010

• #14

Re : Sous totaux

Bonjour à tous,

Pourquoi ne pas utiliser un TCD (Tableau Croisé Dynamique) ?

Voir l'exemple en attachement

A+ à tous

 

Pièces jointes

• Exemple TCD Arpette.zip

  122.9 KB · Affichages: 33

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 3 Avril 2010

• #15

Re : Sous totaux

JCGL à dit:

Bonjour à tous,

Pourquoi ne pas utiliser un TCD (Tableau Croisé Dynamique) ?

Voir l'exemple en attachement

A+ à tous

Cliquez pour agrandir...

Oui c'est vrai, mais mas macro tourne sur l'autre fichier qui me calcule le numéro de semaine en colonne E, que je concatène en colonne B avec l'article qui se trouve en colonne A. Ensuite ces valeur sont exportées vers un autre classeur.
Merci pour ton aide

 

Dernière édition: 3 Avril 2010

Vote positif 0 Vote négatif