Comment copier-coller sous-totaux sans le détail

[Bernard]

Bonjour,
Je bute sur un petit problème : après avoir lancé un calcul de sous-totaux, je souhaite faire un copier-coller uniquement des sous-totaux sur une autre feuille, mais toutes les valeurs intermédiaires suivent... Je dois faire un aller-retour sur Notepad pour 'nettoyer', mais je suis sûr qu'il existe une solution plus simple. Qui pourra m'aider ?

 

[Tibo]

Sallut Bernard,

Possibilité :

Appliquer sur ta liste un filtre automatique

l'activer sur la 1ère colonne avec les crières suivants :

- personnalisé
- contient Somme

A partir de là, un copier / coller devrait ne comprendre que les lignes Somme.

A essayer

Bonne soirée

@+

 

[_Thierry]

Bonsoir Bernard, Tibo, le Forum

Une mini macro comme celle-ci pourrait faire aussi une solution :

Option Explicit

Sub CopiePasteSubTotals()
Dim PlageVisible As Range

Set PlageVisible = ActiveSheet.UsedRange
Set PlageVisible = PlageVisible.SpecialCells(xlCellTypeVisible)

PlageVisible.Copy Sheets('LaFeuilleDeDestination').Range('A1')


End Sub

Bonne Soirée
[ol]@+Thierry[/ol]

 

[XC]

Bonsoir thierry, bernard ou Tibo

j`ai un truc tout bete que j`utilise svt. Tu vas ds Affichage/barre d,outil/personnaliser/edition/selectionner cellule visibles

Bie sur avant tu as masquer tes lignes afin de n`avoir que les sous-totaux

Bon donc tu as tes ous totaux, tu selectione la zone et tu cliques sur le bouton que tu insere en suivant le chemin indique. ainsi tu as la selection des cel visibles
il te reste plus qu`a coller

Si ca marche pas, je te fais un file

a+

XC

 

[andré]

Salut,

Petites astuces supplémentaires.

Pour masquer rapidement les cellules hors sous-totaux.

Sélectionner la plage, puis menu Données / Grouper et créer un plan / Plan automatique.
Raccourcis clavier :
Placer la curseur dans le tableau (une cellule quelconque), puis Ctrl+*
Ensuite Alt+d+p+p (tenir la touche clavier Alt enfoncée et taper successivement les lettrs d,p et p)

Cliquer sur le '1' dans la partie supérieure de la marge de gauche.
Touche clavier F5 / Cellules / cellules visibles seulement / OK
Raccourcis clavier :
Alt+e+t+c+l et Entrée

Enfin un copier / coller traditionnel
Raccourcis clavier :
Ctrl+c et Ctrl+v

Â+

 

[Bernard]

Merci pour cette suggestion !
J'ai testé le filtre automatique personnalisé avec l'option Contient Total, mais je perds les valeurs...

 

[Bernard]

Merci beaucoup, ça marche pile-poil !
J'avais justement besoin de ça pour une macro VBA, c'est génial !
Merci pour le coup main.

 

[Bernard]

Merci XC, ça aussi, ça fonctionne très bien !
Adopté, merci pour le tuyau !

 

[Bernard]

Merci pour l'astuce, mais je trouve plus simple d'utiliser le bouton 'Sélectionner les cellules visibles'.
Merci encore, tchao !