Suppression caractère spécial ~ impossible

Bonjour,

je suis bloquée sur un sujet

J'ai une liste de nom de fichier et dans les noms j'ai le caractère suivant : ~ (en première position)

je souhaite le supprimer dans tous les noms de toute la liste que j'ai.

sauf que

J'ai essayé le remplacer par, cela ne fonctionne pas.

J'ai rajouté un caractère devant ~ mais pareil cela en fonctionne pas.

je ne trouve pas d'autre solution.

pour le moment je le fait manuellement mais j'ai beaucoup de ligne.

Avez-vous une solution a me proposer?

je vous remercie pour votre aide

Pauline

Bonjour,

Essaie cette macro

Sub suppr()
Dim plage As Range
Dim nb As Long

nb = Range("A" & Rows.Count).End(xlUp).Row + 1
Set plage = Sheets("feuil1").Range("a1:a" & nb)
Dim cel As Range
For Each cel In plage
cel.Value = Right(cel.Value, Len(cel) - InStr(cel.Value, "~"))
Next cel
End Sub

Cordialement

Bonjour,

Dans la boite de dialogue il faut doubler le caractère ~

Fait :

Remplacer : ~~

Remplacer par : (rien du tout)

A+

parfait le remplacé par ~~ fonctionne parfaitement.

Merci beaucoup.

et merci pour la macro que je garde précieusement aussi.

Pauline

Rechercher des sujets similaires à "suppression caractere special impossible"