Signaler

[excel]Comment supprimer des retours chariot [Résolu/Fermé]

Posez votre question baborge 93Messages postés dimanche 6 juin 2004Date d'inscription 22 septembre 2012 Dernière intervention - Dernière réponse le 6 juin 2017 à 13:45 par flashmanu15
Bonjour @ toutes & tous

Je seche sur un truc avec excel

je recupere des fichiers excel que je met en forme.

Je cherche un moyen d'automatiser la suppression des retour à ligne inserer dans certaine celulle.

chr(10)

L'ideal serait de les remplacer par une suite de caractere

mais je ne trouve pas comment faire

si qqun a une idée je suis preneur.....

merci d'avance...
Utile
+56
plus moins
On peut sélectionner le menu Edition puis Remplacer (ou CTRL + H) et taper 010 en maintenant la touche ALT enfoncée dans la zone Rechercher. Mettre un espace dans la zone Remplacer par.
Cette réponse vous a-t-elle aidé ?  
Moyy- 19 nov. 2013 à 11:44
MERCIIIIIIIIIIIIIIIIII pour le tuyau !!! quel gain de temps.
ben- 2 janv. 2014 à 10:56
t es un monstre !!!
NJL- 25 févr. 2014 à 10:41
Bonjour,

ça marche qu'avec le pavé numérique du clavier.

Pour ceux qui ont un pc portable, ça ne marche qu'en utilisant la fonction (Fn)

Donc ALT + Fn + 010

Bonne chance.
PHILOSOPHE79- 7 oct. 2015 à 11:16
bon avec mon portable HP elitbook, je galère car pas de pavé numérique => le ALT + fn + 010 ne semble pas marcher non plus (j'ai essayé de mettre majuscule bloqué ou non)... une autre astuce SVP ;-)
flashmanu15- 6 juin 2017 à 13:45
merci, merci et merci encore ! :D
Répondre
Utile
+7
plus moins
Bonjour à tous,

Je me suis posé la même question que vous, à savoir : comment supprimer les retour chariot ?
Voici la macro que je vous propose :



Sub Suppr_Ret_Char()

'NFR 25/08/09

'Cette macro supprime les retours chariot dans la zone sélectionnée

Selection.Replace What:=Chr(10), Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

End Sub



Je vous suggère d'associer un raccourci clavier à cette macro (par ex. Ctrl+Maj+S), ce qui rend d'autant plus facile son utilisation répétée.
Vince- 31 août 2011 à 11:25
Merci encore pour la macro qui vient de me dépanner.
Bonne journée.
Giuliours 7Messages postés jeudi 27 décembre 2012Date d'inscription 23 janvier 2013 Dernière intervention - 23 janv. 2013 à 20:05
Merci beaucoup pour la macro qui va bien m'aider et surtout qui fonctionne sous 2007.
Bonne soirée.
Utile
+5
plus moins
J'utilise ça :
=SUBSTITUE(A1;CAR(10);"<br />")
A1 est la cellule contenant le retour chariot
<br /> étant la chaine de remplacement ou mettre "" pour supprimer.
zook 38Messages postés jeudi 13 mai 2004Date d'inscription 6 juillet 2015 Dernière intervention - 6 juil. 2015 à 16:41
ça date de 2013 mais ça m'est bien utile aujourd'hui; Merci beaucoup ManuManu
excel 1007- 25 juil. 2016 à 10:49
Bonjour,

déterrage d'enfer :&)

mais merci! même en 2016 :o)
Utile
+4
plus moins
J'ai trouvé

a titre d'info:


Sub quelcaractere()
Dim old_text As String
Dim new_text As String

For i = 2 To 15444
    
    If Range("AD" & i).Value <> "" Then
    old_text = Range("AD" & i).Value
    new_text = Replace(old_text, Chr(10), " - ")
    new_text = Replace(new_text, Chr(13), " - ")
    new_text = Replace(new_text, "  ", " ")
    Range("AC" & i).Value = new_text
    End If
Next
End Sub


c'était tout co...

merci @ tout ceux qui on chercher pour moi
et excuser moi pour le dérangement

Bonne soirée @ toutes & tous
Clémentine- 10 mai 2007 à 12:47
ça m'interresse fortement mais lorsque je colle ce texte dans une nouvelle macro Excel me dit "erreur de compilation, Sub ou Function non définie" ; il a l'air de bloquer sur le terme Replace.
Pourquoi?
Pouvez-vous m'aider?
Clémentine
Utile
+0
plus moins
Bonjour,
Je ferais comme ça :
Afficher les formules
Éditions—Rechercher [Chr(10)-Remplacer (chaîne)]
                                      ^ ou autrement
Ça s'enregistre sous forme de macro.
Utile
+0
plus moins
Bonjour,
Merci pour l'astuce, ça m'a bien rendu service, car en exportant les données vers un fichier texte, il y avait autant de lignes supplémentaires que de retours chariot.
Albans
Utile
+0
plus moins
Merci pour cette astuce.
Elle me rend beaucoup service dans mes extractions sous excel criblées de retour chariot dans tous les sens.
Utile
+0
plus moins
Merci pour NFR, code trés utile en cemoment ;)
Utile
+0
plus moins
Merci !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Utile
+0
plus moins
Hello ! Sur mac sans clavier numérique avec ALT et 010 on obtient øø. Comment taper 010 en maintenant la touche ALT enfoncée sans clavier numérique ??
Merciiiiiiiiiiiiiiiiiiiiiiii
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !