Recherche dans plusieurs plages déclarés

[Guigui]

Bonsoir,

J'effectue une recherche dans un chaque cellule d'une plage avec ce morceau de code :

Dim Plage As Range
Dim Cell As Range

With Sheets("PDC")
Set Plage = .Range(.Range("G9"), .Range("AW89"))
End With

For Each Cell In Plage
...
Next Cell


Mon probleme est le suivant:
La recherche est effectué dans un trés grand nombre de cellule (G9 à AW89) pour englober tout mon projet.
Néanmoins, seul des lignes précises contiennent les informations recherchés.

Ex :
("G9:AW9")
("G20:AW20")
("G31:AW31")
("G40:AW40") ...

Je souhaiterais donc effectuer mon defilement de "Cell" uniquement dans ces Range.
Comment puis je modifier ma declartion Set Plage = .Range(.Range("G9"), .Range("AW89")) en incluant uniquement ces zones précises ...
J'ai essayé à ma sauce, mais je bug à coup sure avec les "," ou ";" et ":" ...

Merci d'avance pour votre aide.
Slts
Guillaume

 

[Pierrot93]

Re : Recherche dans plusieurs plages déclarés

Bonjour,

essaye peut être avec la méthode "union" :

Dim plage As Range
Set plage = Union(Range("G9:AW9"), Range("G20:AW20"), Range("G31:AW31"))

bonne journée
@+