Boucle vba pour rechercher un mot et selectionner cellules

[tarvel]

Bonjour,
Avec une boucle vba j'aimerais rechercher dans ma feuil1 le mot "test" qui apparait plusieurs fois dans la colonne A
Une fois trouvé "test" j'aimerais sélectionner la cellule ainsi que la cellule à côté (sur la colonne B) et mettre ces cellules en gras!
Merci pour votre aide

 

[Paritec]

Re : Boucle vba pour rechercher un mot et selectionner cellules

bonjour tarvel
voilà
a+
Papou

option Explicit
option compare text
sub trouver()
dim i&
     with feuil1
         for i = 2 to .range("A"& rows.count).end(xlup).row
         If .cells(i,1) like "*" & "test" & "*" then .range(.cells(i,1),.cells(i,2)).font.bold=1
         next i
   end with
end sub

 

[tarvel]

Re : Boucle vba pour rechercher un mot et selectionner cellules

Merci beaucoup Paritec pour la réponse rapide!

C'est exactement ça ;-)

Fred