Remplacer un caractère par un autre via une macro

Bonjour à tous,

Je vous consulte aujourd'hui car je suis à la recherche d'une astuce pour identifier (et remplacer) des caractères qui ne peuvent pas s'écrire sur une macro.

Jusqu'a présent j'utilisais la formule ci-dessous, fonction CTRL H, pour remplacer tous les caractères de ma page.

Sur ma macro :

Selection.Replace What:="", Replacement:="-", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False, FormulaVersion:=xlReplaceFormula2

Néanmoins, j'ai identifié des caractères qui ne sont pas reconnus, par exemple : "–" (qui n'est pas "-")

En effet lorsque je l'écris dans la macro, – devient - automatiquement...

Avez-vous une astuce, peut etre une autre méthode pour contourner ce problème afin de remplacer via ma macro tous les caractères de ma page "–" en "-"

Merci par avance pour votre retour !

Bonne journée,

Florent

Bonjour

Vous avez essayé avec la fonctionnalité Convertir disponible dans le menu Données ?

Cordialement

Bonjour,
Essaie ainsi :

Selection.Replace What:=char(150), _
                      Replacement:=char(45), _
                      LookAt:=xlPart, _
                      SearchOrder:=xlByRows, _
                      MatchCase:=False, _
                      SearchFormat:=False, _
                      ReplaceFormat:=False, _
                      FormulaVersion:=xlReplaceFormula2

Bonjour à tous, merci d'avoir pris le temps de me faire une réponse.

Dan,

Non je n'ai pas essayé cette fonction, peut-elle etre effectuée sous une macro ?

Jean-Eric,

J'ai bien ajouté ta formule, néanmoins j'ai ce message d'erreur :

image

Bonjour,
Oups !
Chr() au lieur de Char()
Cdlt.

Jean-Eric,

Merci cela fonctionne

image

MERCI beaucoup pour ton aide !!

Re,
Désolé pour l'anomalie !

Rechercher des sujets similaires à "remplacer caractere via macro"