Set plage multiple [Résolu]

[Claude_B]

Bonjour,

Est-il possible de définir plusieurs set plage dans une même ligne de code
Lorsque que la 2ieme ligne de set plage est ajoutée, la première ne fonctionne plus. Y a t-il une façon d'écrire dans la même ligne pour avoir 2 plages différentes

Merci

Code :

1
2
3
4
5
6
7
8
Private Sub CommandButton3_Click()
 
Dim plage As Range
Dim cel As Range
Dim ODLP As Long
 
Set plage = Application.Sheets(4).Range("A1:AW45") '1iere ligne
Set plage = Application.Sheets(4).Range("AZ36:BK42") '2ieme ligne

[ZebreLoup]

En utilisant Union :

Code :

Set plage = Union(Sheets(4).Range("A1:AW45"), Sheets(4).Range("AZ36:BK42"))

[Claude_B]

Merci pour cette réponse rapide