XL 2016 Astuce enlevé des sauts de lignes dans une cellule

Rabeto

XLDnaute Occasionnel
Bonjour,

Dans une colonne escel, j'ai une liste, et quand on double clic sur chaque cellule, certaine cellule contient des à la ligne.
Je souhaite enlever les à la ligne.

Merci
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonjour à tous :),

Un autre :
VB:
Sub SansSautLigne()
Dim Cellule As Range
   On Error Resume Next
   Set Cellule = Application.InputBox(prompt:="Sélectionner une cellule de la colonne à traiter...", Type:=8)
   On Error GoTo 0
   If Cellule Is Nothing Then MsgBox "Abandon.", vbCritical: Exit Sub
   Cellule.Cells(1, 1).EntireColumn.Replace what:=vbLf, replacement:="", lookat:=xlPart
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T