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

Split d'une cellule multi lignes

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion doudou31
  • 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 !

S'inscrire
D

doudou31

Guest
Bonjour à tous,

J'ai un petit problème, j'ai une cellule excel qui contient un texte sur 3 lignes
ex:
"AA
BB
CC"

et j'aimerai récupérer les valeurs de chaque ligne dans une colone séparée, c'est à dire "AA" dans une colone, "BB" dans une autre colone...

Est-ce que quelqu'un sait faire ca avec des fonctions excel (2003) ou faut-il passer par du VBA ?

Merci d'avance
Doudou
 
Trier par date Trier par votes
Re : Split d'une cellule multi lignes

Bonjour doudou,

Par formule si la cellule concernée est A1

B1=GAUCHE(A1;2)
C1=STXT(A1;4;2)
D1=DROITE(A1;2)

Par Macro Après sélection de la cellule.

Code: 
Sub Convertir()
    Selection.TextToColumns Destination:=Selection.Columns.Offset(, 1), DataType:=xlDelimited, Other:=True, OtherChar:=Chr(10)
End Sub
Cette macro copiera le résultat dans les trois cellules de droite après la cellule sélectionnée

A bientôt
 
Vote positif 0 Vote négatif
Re : Split d'une cellule multi lignes

Bonjour à tous,

Toujours si la cellule multiligne est en A1 :

en B1 :

Code: 
=GAUCHE($A1;CHERCHE(CAR(10);$A1)-1)

pour C1 puis à recopier vers la droite :

Code: 
=SI(ESTERREUR(STXT($A1;CHERCHE(B1;$A1)+NBCAR(B1)+1;SI(ESTERREUR(CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1)+NBCAR(B1)+1)-CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1))-1);10000;CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1)+NBCAR(B1)+1)-CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1))-1)));"";STXT($A1;CHERCHE(B1;$A1)+NBCAR(B1)+1;SI(ESTERREUR(CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1)+NBCAR(B1)+1)-CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1))-1);10000;CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1)+NBCAR(B1)+1)-CHERCHE(CAR(10);$A1;CHERCHE(B1;$A1))-1)))
 
Vote positif 0 Vote négatif
Re : Split d'une cellule multi lignes

Bonjour doudou32, Hasco, tototiti2008, le fil, le forum

Puisque qu'on parle de Split 😉

Code: 
Sub le_split()
tbl = Split(Range("A1").Text, Chr(10))
Range("B1") = tbl(0)
Range("C1") = tbl(1)
Range("D1") = tbl(2)
End Sub
 
Vote positif 0 Vote négatif
Re : Split d'une cellule multi lignes

Merci à tous,

et specialement a tototiti2008, car je n'ai pas besoin de macro grace a cette solution.

Par contre Hasco, le nombre de caractère n'est pas fixe dans ma cellule source et il peut y avoir jusqu'a 5 lignes, donc merci quand meme.

Merci encore.
Doudou
 
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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

H
  • Question Question
XL 2019 masquer des colonne sous condition d'une cellule en vba
Réponses
5
Affichages
259
sylvanu
  • Résolu(e)
XL 2021 Problème à l'utilisation calendrier de Patricktoulon.
Réponses
6
Affichages
768
SAMUAL_2023
S
Z
  • Question Question
XL 2016 RECHERCHEV et double liste de choix
Réponses
2
Affichages
1 K
zendb
Z
A
  • Question Question
XL 2019 Copie d'une valeur dans la cellule à côté d'une valeur trouvé
Réponses
1
Affichages
588
sylvanu
P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
334
PRy
P
A
  • Question Question
XL 2021 Comment préserver la première valeur d'une cellule uniquement si
2 3
Réponses
34
Affichages
2 K
Alamyr
A
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
561
Yogean
Y
A
  • Résolu(e)
Microsoft 365 Demande d'aide sur des extractions de lignes
Réponses
7
Affichages
403
agayet
A
A
  • Question Question
Microsoft 365 Tri sur feuille protégée +Aide protection de données déjà saisies
Réponses
2
Affichages
528
TooFatBoy
R
  • Question Question
Microsoft 365 aide recherche multiple entrées d'une cellule dans colonne
2
Réponses
16
Affichages
2 K
richard31
R
A
  • Résolu(e)
XL 2016 Recherche d'un mot dans une cellule et surlignage de la ligne
Réponses
4
Affichages
571
Abi23
A
A
  • Question Question
Microsoft 365 Remplir une cellule automatique, sous condition
Réponses
6
Affichages
523
Phil69970
  • Résolu(e)
XL 2021 Saisie de lignes multiples dans un formulaire
2
Réponses
15
Affichages
1 K
jeff1494
J
  • Question Question
XL 2021 activesheet.shapes suivant la valeur d'une cellule
Réponses
5
Affichages
326
JUAN45
J
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
877
piga25
B
  • Résolu(e)
Power Query Faire un traitement sur une colonne à partir d'une autre liste
Réponses
6
Affichages
1 K
btil
B
  • Question Question
Microsoft 365 Cellule multiligne dans fichier texte.
Réponses
2
Affichages
541
sylvanu
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
1 K
Nel'
N
R
  • Résolu(e)
XL 2019 Envoi TCD par mail
Réponses
8
Affichages
677
Rabeto
R
M
  • Question Question
Microsoft 365 Calcul du nombre de chiffres dans une cellule. Mise en page d'un fichier.
Réponses
2
Affichages
550
MCOTTEND
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…