Sélectionner une cellule qui contient du texte

Résolu/Fermé
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 - 20 mai 2015 à 12:01
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 - 20 mai 2015 à 12:23
Bonjour,

Je voudrais sélectionner une cellule grâce au texte qu'elle contient. Par exemple, si je veux sélectionner la cellule qui contient le mot "michel", je crée le code suivant :

Range("michel").Select

Mais ça ne marche pas

Merci d'avance de votre aide.

1 réponse

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
20 mai 2015 à 12:18
Bonjour Dikold, bonjour le forum,

C'est l'amer Michel !... Le code ci-dessous va sélectionner la première occurrence trouvée :

Sub Macro1()
Dim R As Range
Set R = ActiveSheet.Cells.Find("Michel", , xlValues, xlWhole)
If Not R Is Nothing Then R.Select
End Sub

1
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 1
20 mai 2015 à 12:23
mdr l'amer Michel

En tout cas, merci à toi ça marche nickel :)
0