Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

manipuler .Find

A

albert

Guest
Bonsoir à tous et à toutes, forumiens, forumiennes,

Je tourne en rond sur un problème simple, mais je ne trouve pas de solution :
Dans une liste discontinue, je veux sélectionner le dernier mot « bleu » de la liste.
Si j’écris
Set Plage = Range("A4:A30").Find("bleu")
Plage.Select
C’est le premier mot « bleu » de la plage qui est sélectionné (ligne 9)
Si j’inverse la plage, ça ne marche pas Set Plage = Range("A30:A4").Find("bleu")


Ma question : comment sélectionnr « bleu » à la ligne 14

Merci d’avance
 

Pièces jointes

  • findbleu.zip
    5.8 KB · Affichages: 10
A

albert

Guest
avec un peu de persévérance, on y arrive :


Sub cherche2()
Cells(19, 1).Activate

Set plage = Cells.Find(What:="bleu", After:=ActiveCell, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious)
plage.Select
End Sub
 

Discussions similaires

Réponses
2
Affichages
284
Réponses
12
Affichages
717
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…