Remplacer caractere spécial " ⇄"

Bonsoir,

je récupere certaines données du site www.letrot.com

le symbole " ⇄" est parfois accolé au nom des entraineurs (pour indiquer un changement récent NDLR)

je souhaiterais intégrer, dans une macro existante, le code pour supprimer au passage ce symbole (et l'espace que le précède).

la fonction remplacer fonctionne :

mais le symbole n'est pas reconnu avec l'enregistreur de macros...

Pouvez-vous m'aider ?

bonsoir

c'est la lettre D code 68 en police webdind 3

a charge de l'intégrer dans le code

cordialement

non, ce n'est pas ça... regardez bien le sens des flèches...

c'est plutôt ça :

mais je ne sais pas quoi en faire...

Bonsoir à tous !

L'analyse des caractères donne ceci :

Bonsoir,

A tester

Sub SupprimerFlechesColonne()
    Dim cell As Range
    Dim fleche As String
    fleche = ChrW(8644)
    ' Parcourt chaque cellule de la plage définie
    For Each cell In Range("A10:A30")
        If cell.Value <> "" Then
            ' Remplace toutes les occurrences du caractère flèche
            cell.Value = Replace(cell.Value, fleche, "")
        End If
    Next cell
    MsgBox "Suppression des flèches terminée dans A10:A30 !", vbInformation
End Sub

Slts

merci boss,

c'est bien ce qu'il me fallait !

je ne savais pas comment utiliser ChrW(8644)...