GNT sans publicité, site mobile, fonctionnalitées exclusives...

grouper des lignes

Le
joseph84
Bonjour tout le monde,

je voudrais regrouper des lignes:

ex:

A B
1234 papa
1234 mama
4321 frère
4321 Soeur

après la macros

A B
+ 1234 papa
+ 4321 frère

le problème que j'arrive pas a grouper les lignes qui ont le même
numeros de la colonne A


Merci
Lire les 8 réponses

Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
DanielCo
Le #23674221
Bonjour,
Clique sur la ligne "mama" et sur "grouper"; fais de même sur la ligne
"soeur".
Cordialement.
Daniel


Bonjour tout le monde,

je voudrais regrouper des lignes:

ex:

A B
1234 papa
1234 mama
4321 frère
4321 Soeur

après la macros

A B
+ 1234 papa
+ 4321 frère

le problème que j'arrive pas a grouper les lignes qui ont le même
numeros de la colonne A


Merci
joseph84
Le #23674571
Merci pour votre réponse, mais je voudrais automatiser tout ca avec
une macro
DanielCo
Le #23674671
Sub test2()
Dim c As Range, Res As Integer
Res = 2
For Each c In Range([A1], Cells(Rows.Count, 1).End(xlUp))
If c Range("A" & Res & ":A" & c.Row).EntireRow.Group
Res = c.Row + 2
End If
Next c
End Sub

Daniel


Merci pour votre réponse, mais je voudrais automatiser tout ca avec
une macro
michel ou sam
Le #23674701
Bonjour Daniel,
j'étais parti avec des do- while mais ta solution est plus élégante.

par contre il y a un pb de limite final
en faisant un test avec
1234 papa
1234 mama
3421 frere
3421 s½ur
3421 oncle
3564 tata

le dernier groupe 3421 prend les 2 lignes suivantes (la tata + une ligne)

Michel

"DanielCo" j2uc1k$lc3$
Sub test2()
Dim c As Range, Res As Integer
Res = 2
For Each c In Range([A1], Cells(Rows.Count, 1).End(xlUp))
If c Range("A" & Res & ":A" & c.Row).EntireRow.Group
Res = c.Row + 2
End If
Next c
End Sub

Daniel


Merci pour votre réponse, mais je voudrais automatiser tout ca avec
une macro




joseph84
Le #23674691
merci beaucoup pour ton aide.
mais c'est pas toujours avec une paire de 2 c'est variable
Publicité
Suivre les réponses
Poster une réponse
Anonyme