VBA: Comment supprimer les chr(10) en gardant la mise en forme

MJ13 · 12 Février 2014

Bonjour à tous

Je cherche un moyen en VBA pour supprimer les doubles chr(10) d'une cellule mais en gardant les textes en gras ou pas de façon a voir chaque ligne avec un numéro dans la cellule.

Merci d'avance 🙂.

Roland_M · 12 Février 2014

Re : VBA: Comment supprimer les chr(10) en gardant la mise en forme

bonjour,

perso j'aurai essayé ceci (à voir tapé à la volée !)

while instr(cell.Value,chr(10)): cell.Value = Replace(cell, Chr(10), ""):wend

soit:

Code:

Sub Remplace_CHR10()
On Error Resume Next
For Each cell In Selection
 While InStr(cell.Value, Chr(10)): cell.Value = Replace(cell, Chr(10), ""): Wend
Next
End Sub

EDIT: par-contre pour la mise en forme !?

MJ13 · 12 Février 2014

Re : VBA: Comment supprimer les chr(10) en gardant la mise en forme

Bonjour Roland

Merci pour ce code, mais cela me fait pareil en supprimant le gras, si il y en a 🙁.

MJ13 · 17 Février 2014

Re : VBA: Comment supprimer les chr(10) en gardant la mise en forme

Bonjour à tous

Du coup, j'ai cherché un peu, ce n'était pas facile 😕.

Voici une solution 🙂.

VBA: Comment supprimer les chr(10) en gardant la mise en forme

MJ13

XLDnaute Barbatruc

Pièces jointes

Roland_M

XLDnaute Barbatruc

MJ13

XLDnaute Barbatruc

MJ13

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

VBA: Comment supprimer les chr(10) en gardant la mise en forme

MJ13

XLDnaute Barbatruc

Pièces jointes

Roland_M

XLDnaute Barbatruc

MJ13

XLDnaute Barbatruc

MJ13

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency