collection de cellule en VBA : RANGE

[jhofman]

bonjour
je désire écrire un code faisant référence à une plage de cellules variable
voila ce que j'ai fait mais cela ne fonctionne pas.
Merci de votre aide.
Cordialement

Dim Cel As Range
If condition then 
range_C = Range("C7:h31")
Else
range_C = Range("C7:J42")
End If
    
For Each Cel In range_C

 

[skoobi]

Re : collection de cellule en VBA : RANGE

Bonjour,

il manque "Set" devant la variable range_C:

Dim Cel As Range
If condition then
Set range_C = Range("C7:h31")
Else
Set range_C = Range("C7:J42")
End If

For Each Cel In range_C

 

[jhofman]

Re : collection de cellule en VBA : RANGE

Merci bien.

précision : Range_c doit aussi être déclaré comme range.