Supprimer les sauts de lignes dans une cellule GS

qwerty_213 Messages postés 26 Date d'inscription   Statut Membre Dernière intervention   -  
qwerty_213 Messages postés 26 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour, je cherche une equation qui permet de supprimer les sauts de lignes à l'interieur d'une cellule

exemple:

3 réponses

Réponse 1 / 3
jee pee Messages postés 41510 Date d'inscription   Statut Modérateur Dernière intervention   9 715
 
Bonjour,

A essayer avec texte en A1 
=SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;CAR(10)&CAR(10)&CAR(10);CAR(10));CAR(10)&CAR(10);CAR(10));CAR(10)&CAR(10);CAR(10));CAR(10);"";1)
0
Réponse 2 / 3
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Bonsoir qwerty

Ce n'est pas une équation qu'il te faut mais

soit une formule (comme celle proposée par jee pee que je salue au passage, mais qui chez moi met toute les infos à la suite sur la même ligne)

soit une macro comme celle ci : 
Sub supprimersaut()
chaine = ActiveCell.Value
tablo = Split(chaine, vbLf)
For n = 0 To UBound(tablo)
If tablo(n) <> "" Then nouv = nouv & Chr(10) & tablo(n)
Next
ActiveCell = Right(nouv, Len(nouv) - 1)
End Sub

Faire Alt + F11 pour ouvrir l'éditeur VBA puis Insertion et Module
Copier et coller la macro dans le module puis fermer l'éditeur

Pour faire fonctionner la macro: se positionner sur la cellule à traiter puis dans le ruban aller à Affichage puis Macros, sélectionner la macro et Exécuter

Cdlmnt
Via
0
jee pee Messages postés 41510 Date d'inscription   Statut Modérateur Dernière intervention   9 715
 
bonjour, même ligne : il faut peut être passer le format de cellule en "renvoyer à la ligne automatiquement" ?
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746 > jee pee Messages postés 41510 Date d'inscription   Statut Modérateur Dernière intervention  
 
Oui cela va un peu mieux avec renvoyer à la ligne automatiquement mais ce n''est pas encore tout à fait ça
Avec au départ
aaa

bbb

ccc

ddd

j'obtiens avec ta formule :

aaabbb
ccc
ddd
0
jee pee Messages postés 41510 Date d'inscription   Statut Modérateur Dernière intervention   9 715 > via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention  
 
yep, ya un bug quand cela ne démarre pas par un saut de ligne. Comme là je n'ai pas envie de me creuser la tête, je vais en rajouter un, pour pouvoir l'enlever ;-) 
=SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(CAR(10)&A1;CAR(10)&CAR(10)&CAR(10);CAR(10));CAR(10)&CAR(10);CAR(10));CAR(10)&CAR(10);CAR(10));CAR(10);"";1)
0
Réponse 3 / 3
qwerty_213 Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
mrci pour vos reponses,

j'ai trouvé une equation generique
=SUBSTITUTE(TRIM(SUBSTITUTE(E43,CHAR(10)," "))," ",CHAR(10))

0

Discussions similaires

Supprimer conversation messenger pour tout le monde
mercidemaider -
sd -

7 réponses