Remplacement de caractères

Bonjour,
j'ai un problème du même ordre que dans cette discussion.
Je tiens tout d'abord à préciser que j'ai cherché sur la FAQ et sur le forum avant de poser ma question.

Voilà, j'ai des cellules contenant des caractères étranges, exmple : "Création révision non planifiée dans Customer".

Mon but, créer une macro qui remplace tous les "é" par des "é".

J'ai bien essayer d'utiliser

Code:

---

1 2 3

Cells.Select Selection.Replace What:="é", Replacement:="é", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False

---

mais j'ai une erreur d'exécution 1004 qui me bloque.

Quelqu'un pourrait-il m'aider ?

Merci d'avance.

Bonjour César Pinaud,

Une 1ère remarque :

vous auriez dû créer un nouveau sujet et insérer un lien éventuellement vers celui-ci pour montrer qu'il se rapprochait de ce que vous vouliez faire.

Edit AlainTech: J'ai déplacé les messages.

Cela dit :

Je ne vois pas à quoi sert dans votre code le ligne en rouge ci-dessous :

Citation:

---

Cells.Select
Selection.Replace What:="é", Replacement:="é", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

---

Il faut définir votre sélection et il y a plusieurs solutions, en voici une :

Code:

---

1 2 3 4 5

Sub Remplacer() Range(Cells(2, 1), Cells(5, 1)).Select Selection.Replace What:="é", Replacement:="é", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False End Sub

---

Amicalement.

Merci beaucoup jacques_jean, ça m'être d'une grand utilité.