Suppression Retour à la ligne

cdric78

XLDnaute Junior
Bonjour à tous,

Je souhaite pouvoir supprimer le retour à la ligne de chaque cellule via une VBA.

Je vous remercie par avance pour votre aide
 

Pièces jointes

  • Classeur1.xlsx
    11.1 KB · Affichages: 88
  • Classeur1.xlsx
    11.1 KB · Affichages: 111
  • Classeur1.xlsx
    11.1 KB · Affichages: 114

Grand Chaman Excel

XLDnaute Impliqué
Re : Suppression Retour à la ligne

Bonjour cdric78,

Un exemple, la plage est à adapter bien sûr :
Note : le retour de ligne correspond au caractère ascii no.10.

VB:
Sub Twidelatwit()
    Dim c As Range
    
    Application.ScreenUpdating = False
    For Each c In Range("a1:B37")
        c = Replace(c, Chr(10), "")
    Next c
    Application.ScreenUpdating = True
End Sub

A+
 

Membres actuellement en ligne

Statistiques des forums

Discussions
312 872
Messages
2 093 103
Membres
105 627
dernier inscrit
jean-marc.brillant