Macro copie les sous-totaux

Le
Françoise
re-bonjour,

c'est la journée questions !
je fais une macro qui va trier mes données et ensuite faire les sous totaux
je veux récupérer les sous-totaux et uniquement ceux ci dans une autre feuille
lorsque je fais une macro de copie, elle reprend l'intégralité des lignes
comme faire pour ne prendre que les lignes avec la reférence et le total ?

voici le début de la macro qui fait les sous totaux :

Sub SousTotaux()
'
Cells.Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3), _
Replace:=True, PageBreaks:úlse, SummaryBelowData:=True
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub
==
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Misange
Le #6660201
IL ne faut copier que les lignes visibles
Selection.SpecialCells(xlCellTypeVisible).Copy

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

re-bonjour,

c'est la journée questions !
je fais une macro qui va trier mes données et ensuite faire les sous totaux
je veux récupérer les sous-totaux et uniquement ceux ci dans une autre feuille
lorsque je fais une macro de copie, elle reprend l'intégralité des lignes
comme faire pour ne prendre que les lignes avec la reférence et le total ?

voici le début de la macro qui fait les sous totaux :
===== > Sub SousTotaux()
'
Cells.Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3), _
Replace:=True, PageBreaks:úlse, SummaryBelowData:=True
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub
=====


Françoise
Le #6660771
Merci merci beaucoup Misange !
Il me reste encore beaucoup à apprendre...
A bientôt


IL ne faut copier que les lignes visibles
Selection.SpecialCells(xlCellTypeVisible).Copy

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

re-bonjour,

c'est la journée questions !
je fais une macro qui va trier mes données et ensuite faire les sous totaux
je veux récupérer les sous-totaux et uniquement ceux ci dans une autre feuille
lorsque je fais une macro de copie, elle reprend l'intégralité des lignes
comme faire pour ne prendre que les lignes avec la reférence et le total ?

voici le début de la macro qui fait les sous totaux :
===== > > Sub SousTotaux()
'
Cells.Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3), _
Replace:=True, PageBreaks:úlse, SummaryBelowData:=True
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub
==== >




Misange
Le #6661361
comme dirait quelqu'un ici (en fait plusieurs !)
c'était avec plaisir !

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

Merci merci beaucoup Misange !
Il me reste encore beaucoup à apprendre...
A bientôt


IL ne faut copier que les lignes visibles
Selection.SpecialCells(xlCellTypeVisible).Copy

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

re-bonjour,

c'est la journée questions !
je fais une macro qui va trier mes données et ensuite faire les sous totaux
je veux récupérer les sous-totaux et uniquement ceux ci dans une autre feuille
lorsque je fais une macro de copie, elle reprend l'intégralité des lignes
comme faire pour ne prendre que les lignes avec la reférence et le total ?

voici le début de la macro qui fait les sous totaux :
===== >>> Sub SousTotaux()
'
Cells.Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3), _
Replace:=True, PageBreaks:úlse, SummaryBelowData:=True
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub
=====






Publicité
Poster une réponse
Anonyme