Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Épurer les lignes vides d'une cellule puis fractionner la cellule en plusieurs lignes

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
D

de_hanstrapp

XLDnaute Occasionnel
Bonjour le forum,

Dans le fichier exemple joint, je cherche à :
1/ supprimer toutes les lignes vides contenues dans les cellules de la colonne "C" pour arriver au résultat de l'onglet 2
2/ fractionner les lignes contenues dans les cellules pour arriver au résultat de l'onglet 3

J'ai cherché sur le forum mais dans les codes d'épurage trouvés, il ne prend jamais en compte la première ligne et pour spliter en plusieurs lignes on fait référence à un caractère alors que la il s'agit d'une tabulation.

Des idées ?

Merci par avance,

De_Hanstrapp
 

Pièces jointes

Trier par date Trier par votes
Bonjour

Une solution avec PowerQuery
PowerQuery: 
let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    #"Type modifié" = Table.TransformColumnTypes(Source,{{"JOUR", Int64.Type}, {"DISCIPLINE", type text}, {"PROGRAMME", type text}}),
    #"Tableau croisé dynamique des colonnes supprimé" = Table.UnpivotOtherColumns(#"Type modifié", {"JOUR", "DISCIPLINE"}, "Attribut", "Valeur"),
    #"Fractionner la colonne par délimiteur" = Table.SplitColumn(#"Tableau croisé dynamique des colonnes supprimé", "Valeur", Splitter.SplitTextByDelimiter("#(lf)", QuoteStyle.Csv), {"Valeur.1", "Valeur.2", "Valeur.3", "Valeur.4", "Valeur.5", "Valeur.6", "Valeur.7", "Valeur.8", "Valeur.9", "Valeur.10", "Valeur.11", "Valeur.12"}),
    #"Type modifié1" = Table.TransformColumnTypes(#"Fractionner la colonne par délimiteur",{{"Valeur.1", type text}, {"Valeur.2", type text}, {"Valeur.3", type text}, {"Valeur.4", type text}, {"Valeur.5", type text}, {"Valeur.6", type text}, {"Valeur.7", type text}, {"Valeur.8", type text}, {"Valeur.9", type text}, {"Valeur.10", type text}, {"Valeur.11", type text}, {"Valeur.12", type text}}),
    #"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(#"Type modifié1", {"JOUR", "DISCIPLINE", "Attribut"}, "Attribut.1", "Valeur"),
    #"Lignes filtrées" = Table.SelectRows(#"Supprimer le tableau croisé dynamique des autres colonnes", each ([Valeur] <> null and [Valeur] <> "") and ([Attribut.1] <> "Valeur.1")),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Lignes filtrées",{"Attribut.1"})
in
    #"Colonnes supprimées"
Il doit y avoir un code M plus simple
Celui-ci a été obtenu avec l'Assistant PQ

Voici le résultat obtenu dans Excel
 
Vote positif 0 Vote négatif
Bonjour @Efgé 😉

Pour coller plus au résultat à obtenir
PowerQuery: 
let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    #"Type modifié" = Table.TransformColumnTypes(Source,{{"JOUR", Int64.Type}, {"DISCIPLINE", type text}, {"PROGRAMME", type text}}),
    #"Tableau croisé dynamique des colonnes supprimé" = Table.UnpivotOtherColumns(#"Type modifié", {"JOUR", "DISCIPLINE"}, "Attribut", "Valeur"),
    #"Fractionner la colonne par délimiteur" = Table.SplitColumn(#"Tableau croisé dynamique des colonnes supprimé", "Valeur", Splitter.SplitTextByDelimiter("#(lf)", QuoteStyle.Csv), {"Valeur.1", "Valeur.2", "Valeur.3", "Valeur.4", "Valeur.5", "Valeur.6", "Valeur.7", "Valeur.8", "Valeur.9", "Valeur.10", "Valeur.11", "Valeur.12"}),
    #"Type modifié1" = Table.TransformColumnTypes(#"Fractionner la colonne par délimiteur",{{"Valeur.1", type text}, {"Valeur.2", type text}, {"Valeur.3", type text}, {"Valeur.4", type text}, {"Valeur.5", type text}, {"Valeur.6", type text}, {"Valeur.7", type text}, {"Valeur.8", type text}, {"Valeur.9", type text}, {"Valeur.10", type text}, {"Valeur.11", type text}, {"Valeur.12", type text}}),
    #"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(#"Type modifié1", {"JOUR", "DISCIPLINE", "Attribut"}, "Attribut.1", "Valeur"),
    #"Lignes filtrées" = Table.SelectRows(#"Supprimer le tableau croisé dynamique des autres colonnes", each ([Valeur] <> "" and [Valeur] <> " ")),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Lignes filtrées",{"Attribut", "Attribut.1"}),
    #"Colonnes renommées" = Table.RenameColumns(#"Colonnes supprimées",{{"Valeur", "PROGRAMME"}})
in
    #"Colonnes renommées"
 
Vote positif 0 Vote négatif
Merci Staple1600.
J'essaie de suivre la démarche via powerquery mais je bloque assez vite...
Comment procèdes-tu pour fractionner par délimiteur (tu es dans quelle colonne à ce moment la ? Valeur ?
 
Vote positif 0 Vote négatif
Re, Bonjour @mapomme


@de_hanstrapp
J'ai fait un peu de ménage
PowerQuery: 
let
  Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
   #"Fractionner la colonne par délimiteur" = Table.SplitColumn(Source, "PROGRAMME", Splitter.SplitTextByDelimiter("#(lf)", QuoteStyle.Csv), {"PROGRAMME.1", "PROGRAMME.2", "PROGRAMME.3", "PROGRAMME.4", "PROGRAMME.5", "PROGRAMME.6", "PROGRAMME.7", "PROGRAMME.8", "PROGRAMME.9", "PROGRAMME.10", "PROGRAMME.11", "PROGRAMME.12"}),
    #"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(#"Fractionner la colonne par délimiteur", {"JOUR", "DISCIPLINE"}, "Attribut", "Valeur"),
    #"Lignes filtrées" = Table.SelectRows(#"Supprimer le tableau croisé dynamique des autres colonnes", each ([Valeur] <> "" and [Valeur] <> " ")),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Lignes filtrées",{"Attribut"}),
    #"Colonnes renommées" = Table.RenameColumns(#"Colonnes supprimées",{{"Valeur", "PROGRAMME"}})
in
    #"Colonnes renommées"

Pour tester, voici comment tu peux procéder
Depuis ton classeur exemple
Obtenir les données/A partir d'autres sources/Requête vide
Ce qui te mène dans PowerQuery
Là sur l'onglet Accueil, choisir Editeur avancé
Puis copier/coller le code M de mon dernier message
Tu dois obtenir ceci

Ensuite il te reste plus qu'à cliquer sur Fermer et Charger

@Efgé
Merci pour le fichier exemple.
Ce m'a remis les yeux en face des trous 😉
 
Vote positif 0 Vote négatif
Merci Staple1600, je souhaitais simplement comprendre quelle manip tu as utilisée pour intégrer le séparateur #(If) car je n'y arrive pas.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

O
  • Question Question
Autres recopie de cellules selon la date
Réponses
3
Affichages
132
olivier Clech
O
C
Excel : Fusionner des cellules en conservant le contenu et la police des cellules à fusionner
Réponses
5
Affichages
110
crocrocro
C
G
  • Question Question
XL 2016 Comment concaténer plusieurs dates (provenant d'une formule) de différentes cellules en une seule cellule?
Réponses
4
Affichages
246
JHA
J
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
487
Nel'
N
D
  • Question Question
Microsoft 365 Procédé pour appliquer un filtre qui permet de ressortir les informations a la sélection d'une information dans une colonne.
Réponses
6
Affichages
74
djidji59430
A
  • Question Question
Microsoft 365 INDEX+EQUIV dont le resultat duplique les lignes par erreur
Réponses
5
Affichages
244
aeca
A
P
  • Résolu(e)
XL pour MAC Problème de changement de couleur de la valeur d'une cellule
Réponses
2
Affichages
287
pvander
P
C
  • Question Question
XL 2021 Créer une vue filtrée sur plusieurs lignes
Réponses
1
Affichages
452
djidji59430
E
  • Question Question
Microsoft 365 Mise en forme conditionnelle d'une ligne avec critère.
Réponses
9
Affichages
363
TooFatBoy
L
  • Résolu(e)
Microsoft 365 VBA - Attribuer mise en forme en fonction de valeur cellule d'une liste
Réponses
14
Affichages
708
Laliepomm
L
A
  • Question Question
Microsoft 365 Diviser une cellule non déjà fusionnée en plusieurs lignes
Réponses
0
Affichages
432
alexandre.o
A
M
  • Résolu(e)
XL 2013 Macross supprimant les données de cellule en dehors d'une période définie dans deux autres cellules
Réponses
9
Affichages
558
MarineU
M
F
  • Résolu(e)
Microsoft 365 Mise en forme conditionnelle selon la référence d'une cellule
Réponses
3
Affichages
612
filiph79
F
M
  • Question Question
XL 2016 Extraire plusieurs chaînes de caractères d'une même cellule
Réponses
14
Affichages
664
Mam's
M
EXCEL :: Regroupements et détails dynamiques en lignes et en colonnes d'un croisement par PIVOTER.PAR entièrement piloter par la fonction LET
Réponses
2
Affichages
79
oguruma
M
  • Question Question
XL 2021 COPIER valeur d'une cellule pour constituer un tableau de résultats
Réponses
13
Affichages
379
matlatarte
M
  • Résolu(e)
XL 2021 Supprimer les lignes qui contiennent des cellules vides dans les colonnes "A à M" à partir de la ligne 5
Réponses
6
Affichages
593
Usine à gaz
R
  • Résolu(e)
Autres Masquer des lignes et colonnes en fonction d'une valeur d'un menu déroulant
Réponses
1
Affichages
438
Romain77144
R
B
  • Question Question
XL 2016 Formule Recherche d'une cellule dans plusieurs onglets différents
Réponses
2
Affichages
422
oguruma
  • Question Question
XL 2016 Formule nbre de jours ouvrés et cellules vides renvoyant la cellule O à vide
Réponses
3
Affichages
527
Gégé-45550
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…