Supprimer caractères

[maval]

Bonjour

J'ai sur une colonne "A" des noms de villes avec des caractères a supprimer " - et " guillemets "
Je joins mon fichier exemple.

Je vous remercie de votre aide

Max

 

[DoubleZero]

Bonjour, maval, le Forum,

L'enregistreur de macro, notre ami, permet d'obtenir aisément le résultat souhaité. Il suffit, simplement, d'oser le solliciter pour l'écriture de ceci :

Option Explicit
Sub a()
    Columns("A:A").Select
    Selection.SpecialCells(xlCellTypeConstants, 23).Select
    Selection.Replace What:="""", Replacement:="", LookAt:=xlPart, _
                      SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
                      ReplaceFormat:=False
    Selection.Replace What:="-", Replacement:=" ", LookAt:=xlPart, _
                      SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
                      ReplaceFormat:=False
End Sub

Un petit "nettoyage" ne laisse que cela :

Option Explicit
Sub Caractères_supprimer()
    With Columns("a:a").SpecialCells(xlCellTypeConstants)
        .Replace What:="""", Replacement:="", LookAt:=xlPart
        .Replace What:="-", Replacement:=" ", LookAt:=xlPart
    End With
End Sub

A bientôt 🙂

 

[DoubleZero]

Re-bonjour,

Une demande similaire ici...

😵🙂