Décomposer des lignes de texte en colonne

  • Initiateur de la discussion Initiateur de la discussion josanche
  • Date de début Date de début

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 !

josanche

XLDnaute Occasionnel
Bonjour à tous

Content d'etre à nouveau sur le forum ! J'aurais besoin de votre attention pour résoudre un petit problème.😎

Dans la pièce jointe attachée, il y a en colonne A, des éléments d'informations que je voudrais répertorier en 4 colonnes différentes: Name, party, state et vote.

Exemple: Heflin (D-AL),*Yea dont heflin est le nom, D va dans la colonne party, AL va dans la colonne state et Yea va dans la colonne Vote.

Quel macro faut-il utilisé ?

merci
 

Pièces jointes

Re : Décomposer des lignes de texte en colonne

Bonjour

Tu peux peut être faire avec les formules du fichier ci-joint. Attention, je ne sais d'où vient l'espace après la virgule. Cela ne fonctionne pas avec la barre d'espace. J'ai obtenu la bonne formule avec un copier coller, et encore, il y avait un problème en ligne 15.

@ plus
 

Pièces jointes

Dernière édition:
Re : Décomposer des lignes de texte en colonne

Bonsoir

Ligne N°15 pose un soucis avec nom composé d'ou la proposition 1 mais la proposition est plus adapter si pas de non composer avec un tiret "-" car le calcule se fait en automatique et pas de nombre fixe (proposition 1)

Sur cette même ligne il y a une virgule qui na pas d'espace aprés year se qui génére cette erreur (ear) il faut donc remettre en espace entre la virgule est year (, year)

2 proposition sur les deux onglets excel (Poposition 1 ou Poposition 2)

Cellule F3 (Poposition 1)
=GAUCHE(A3;CHERCHE("(";A3)-2)

Cellule G3 (Poposition 1)
=DROITE(GAUCHE(A3;CHERCHE("-";A3)-1);1)
ou
Cellule G3 (Poposition 2)
=DROITE(GAUCHE(A3;CHERCHE("-";A3)-1);CHERCHE("-";A3)-1-CHERCHE("(";A3))


Cellule H3(Poposition 1)
=DROITE(GAUCHE(A3;CHERCHE(")";A3)-1);2)
ou
Cellule H3(Poposition 2)
=DROITE(GAUCHE(A3;CHERCHE(")";A3)-1);CHERCHE(")";A3)-1-CHERCHE("-";A3))

Cellule G3 (Poposition 1)
=DROITE(A3;NBCAR(A3)-CHERCHE(",";A3)-1)

Laurent 950
 

Pièces jointes

Dernière édition:
Re : Décomposer des lignes de texte en colonne

Bonsoir mapomme,

Ligne N° 15 le probléme est toujours la : C'est ce nom composé qui pose soucis "Moseley-Braun" a cause du tiret "-"

Moseley-Braun (D-IL),Yea Moseley-Braun D Br Yea

le resulat devrait être :

Moseley-Braun (D-IL),Yea Moseley-Braun D IL Yea

les fonctions c'est bien mais moin puissant que la programmation en utilisant VBA. mais votre formule est bonne aussi est bien pensé.

laurent
 
Dernière édition:
Re : Décomposer des lignes de texte en colonne

Re Josanche, Rachid, laurent950,

laurent950:
Ligne N° 15 le probléme est toujours la : C'est ce nom composé qui pose soucis "Moseley-Braun" a cause du tiret "-"

Il m'avait échappé celui-là. Voir le fichier avec modif de la formule. Et aussi une simplification de la formule pour le nom (merci Rachid)
 

Pièces jointes

Dernière édition:
Re : Décomposer des lignes de texte en colonne

Bonsoir @ tous,
Ligne N° 15 le probléme est toujours la : C'est ce nom composé qui pose soucis "Moseley-Braun" a cause du tiret "-"
Moi aussi j'ai pas fait attention je dois tout refaire je vais essayer de voir ça, l'essentiel chez moi c'est de trouver une seule formule qu'on tirer vers le bas et vers la droite, je m'amuse avec ce genre de formule qui se tire vers le bas et vers la droite...
Amicalement
 
Re : Décomposer des lignes de texte en colonne

Bonsoir tout le monde,
à tester :
Name :
Code:
=GAUCHE(A3;CHERCHE(" ";A3)-1)
Party :
Code:
=STXT(A3;CHERCHE("(";A3)+1;CHERCHE("/";SUBSTITUE(A3;"-";"/";NBCAR(A3)-NBCAR(SUBSTITUE(A3;"-";""))))-CHERCHE("(";A3)-1)
State :
Code:
=STXT(A3;CHERCHE("(";A3)+1;CHERCHE("/";SUBSTITUE(A3;"-";"/";NBCAR(A3)-NBCAR(SUBSTITUE(A3;"-";""))))-CHERCHE("(";A3)-1)
Vote :
Code:
=STXT(SUBSTITUE(A3;CAR(160);"");CHERCHE(",";SUBSTITUE(A3;CAR(160);""))+1;99)
A+
 
Re : Décomposer des lignes de texte en colonne

Re
Moi aussi j'ai pas fait attention je dois tout refaire je vais essayer de voir ça, l'essentiel chez moi c'est de trouver une seule formule qu'on tirer vers le bas et vers la droite, je m'amuse avec ce genre de formule qui se tire vers le bas et vers la droite...

A tester :
Code:
=STXT("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))+1;CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:B)))-CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))-1)
A+
 
Re : Décomposer des lignes de texte en colonne

Bonsoir David84 😀 , le forum,

=STXT("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))+1;CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:B)))-CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))-1)
C'est pas faux! 😛 Il fallait aller au bout de celle ci ! Mais (et je plaisante) comment remettre l'espace entre le not et voting? Celle là peut-être?
Code:
=SUBSTITUE(STXT("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))+1;CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:B)))-CHERCHE("§";SUBSTITUE("/"& SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");" ";"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))-1);"Voting"; " Voting")
 
Re : Décomposer des lignes de texte en colonne

Re
comment remettre l'espace entre le not et voting?
Peut-être simplement en gardant les espaces au lieu de les supprimer :
Code:
=STXT("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))+1;CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:B)))-CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))-1)

Moralité : mieux vaut voter sinon ça fout la m......😱
A+

Edit : si l'on veut vraiment ne pas avoir d'espace (si l'on veut pouvoir faire un copier-coller pour garder la valeur par exemple) :
Code:
=SUPPRESPACE(STXT("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))+1;CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:B)))-CHERCHE("§";SUBSTITUE("/"&SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE($A3;CAR(160);"");",";"");"(";"/");"-";"/";NBCAR($A3)-NBCAR(SUBSTITUE($A3;"-";"")));")";"/")&"/";"/";"§";COLONNES($A:A)))-1))
 
Dernière édition:
Re : Décomposer des lignes de texte en colonne

Bonjour pierrejean,

Un petit VBA par la taille mais Grand par l'esprit... Franchement vous ête un Crack félicitation... J'aimerais savoir si vous avez l'astuce pour intégré des couleur ou format a (dans un tableau) et tous restitué en une seul fois.

laurent
 
- 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

Retour