Coder la fonction Ctrl + F ?

Bonjour a tous,

Je souhaite effectuer une macro avec une recherche de valeur particulière, ce qui correspond au raccourci : ctrl + f
Comment coder en VBA une recherche de valeurs dans une feuille dans un premier temps et comment coder un remplacement.

Quelqu'un pourrait-il m'apporter une reponse ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

dim reference as string 'tu definies la plage de recherche With Range("A2:A9") 'reference est le mot que tu recherches, 'LookIn:=xlValues signifie que tu regardes dans le contenu des cellules parcourues 'LookAt:=xlWhole signifie que tu veux exactement le mot reference Set c = .Find(reference, LookIn:=xlValues, LookAt:=xlWhole) ' si il a trouvé la "reference" If Not c Is Nothing Then ' pour récupérer la ligne ou se trouve reference: c.Row End If End With

---

Bonjour,

As-tu au moins tenté d'utiliser l'enregistreur de macro (juste pour voir le code qu'écrirait M. VBA) ?
Tu pourrais commencer par là ..;)

Hello,

Passe par l'assistant enregistreur de macro ca marche assez bien !

voici le code pour remplacer :

Code:

---

1 2	Cells.Replace What:="titi", Replacement:="toto", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

---

Bonjour

Code:

---

1 2	Range("A1:a10").Replace what:="martine", replacement:="Manon"

---

Regarde dans l'aide VBA sur REPLACE pour les explications sur les paramètres optionnels.

Ok?