XL 2019 Eclater les catégories d'un tableau

Nico2978

Nico2978

XLDnaute Nouveau
Bonjour à tous,
je souhaiterais savoir si il est possible de transformer via une fonction excel ou via vba un tableau comme celui ci:
1712566913452.png


En une liste comme celle la:
1712566991258.png


Et si oui, comment faut-il s'y prendre s'il vous plaît?

Je vous remercie! Et au vu de l'heure bon appétit
 
Solution
job75
Bon pour traiter les doublons il suffit d'ajouter un tri :
VB: 
Sub Modifier()
Dim P As Range, i&
Set P = [A1].CurrentRegion
Application.ScreenUpdating = False
P.Rows(P.Rows.Count + 1).Resize(Rows.Count - P.Rows.Count - P.Row + 1).Delete xlUp 'RAZ
P.Copy P(P.Rows.Count + 2, 1)
Set P = P(P.Rows.Count + 2, 1).Resize(P.Rows.Count, P.Columns.Count)
P.Sort P.Columns(1), xlAscending, Header:=xlYes 'tri
For i = P.Rows.Count To 2 Step -1
    If P.Cells(i, 1) <> P.Cells(i - 1, 1) Then
        P.Rows(i).Insert xlDown
        P.Rows(1).Copy P.Rows(i)
        P.Cells(i, 1) = P.Cells(i + 1, 1)
        P.Cells(i + 1, 1) = ""
    Else
        P.Cells(i, 1) = ""
    End If
Next
P.Rows(1).Delete xlUp
End Sub
Trier par date Trier par votes

Discussions similaires

H
  • Résolu(e)
XL 2016 alimenter mais différent onglet avec le tableau
Réponses
13
Affichages
399
TooFatBoy
TooFatBoy
M
  • Résolu(e)
Microsoft 365 code pour ajout
Réponses
13
Affichages
399
Marvin57
M
T
  • Question
XL 2021 Reporter sous forme de liste dans une cellule les donnés contenues dans plusieurs cellules et cela sous condition
Réponses
2
Affichages
154
thioff
T
S
  • Résolu(e)
Microsoft 365 [Résolu] Aide sur gestionnaires de noms + liste déroulante en cascade associée
Réponses
9
Affichages
672
djidji59430
djidji59430
O
  • Question
Power Query Convertir un tableau de colonnes en lignes avec plusieurs variables (power query)
Réponses
8
Affichages
763
oobiz
O
Phil Du59
  • Résolu(e)
Microsoft 365 Tableau de STATS sur autre feuille
Réponses
8
Affichages
324
AtTheOne
AtTheOne
M
  • Résolu(e)
XL 2016 Comment récupérer les données d'un tableau excel vers un espace Powerpoint
Réponses
7
Affichages
629
melltel
M
N
  • Résolu(e)
Microsoft 365 Calcul de plages horaires
2 3 4
Réponses
49
Affichages
1 K
NONO14
N
H
  • Résolu(e)
Microsoft 365 Remplir un tableau récap à partir d'une base de données, avec 2 critères
Réponses
7
Affichages
895
dysorthographie
dysorthographie
T
  • Question
Microsoft 365 Garder les doublons dans une liste déroulante
Réponses
3
Affichages
344
djidji59430
djidji59430

Membres actuellement en ligne

2 membres et 26 invités.

Partager cette page

Tutos vidéos

Power Query : Ajouter des requêtes (Excel et Power BI)
Créez votre première fonction LAMBDA dans Excel en 3 étapes!
LAMBDA, l’arme secrète de Microsoft pour Excel !
Office Insider - Découvrez les nouveautés Excel avant tout le monde

Statistiques des forums

Discussions
315 127
Messages
2 116 534
Membres
112 771
dernier inscrit
mikadu49