Set plage multiple

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

---

En utilisant Union :

Code:

---

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

---

:ccool: Merci pour cette réponse rapide