Selection cellule spécifique et les cellules suivantes

Bonjour,

Avec VBA, je rame à trouver la solution à ce problème. J'ai une colonne qui contient de nombreuses valeurs. Je souhaiterais sélectionner dans cette colonne une cellule qui contient la valeur 100 et sélectionner les 20 cellules suivantes (avec la cellule possédant la valeur 100 inclus).
Quelqu'un aurait une idée ?
Je vous remercie d'avance pour votre réponse.

Hello,

Je ne suis pas un pro , plutôt débutant, mais peut-être une piste pour toi :

Code:

---

1 2 3 4

Sub Test() Cells.Find(What:="100").Activate Range(Cells(Selection.Row, 1), Cells(Selection.Row, 20)).Select End Sub

---

Merci beaucoup ! Tu m'as donné de bonnes pistes :) Je suis débutant aussi :D

Voici ton code que j'ai modifié :

Code:

---

1 2	Columns(2).Cells.Find(What:=100).Activate Range(Cells(Selection.Row, 1), Cells(Selection.Row + 20, 1)).Select

---

En fait dans ton code, il y avait bien la sélection de la cellule qui contient 100. Mais tu as fait une sélection des 20 cellules suivantes sur la même ligne. En choisissant Selection.Row, 1 et Selection.Row, 20, cela correspond aux colonnes 1 à 20.
Comme il n'y a que la colonne 1 qui m'intéresse, je mets donc partout Selection.Row, 1 et Selection.Row + 20, 1 pour prendre les 20 cellules suivantes de la même colonne.

Merci encore :)

Content d avoir pu te mettre sur la piste

Mal compris ton enoncer compris ligne plutôt que colone.

N oublie pas de marquer comme résolu ;-)