Bonjour tous le monde!

J'ai un userform avec dedans 5 Checkbox.
Si un checkbox est coché alors je veux qu'une plage de cellule soit sélectionné.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
Private Sub CommandButton1_Click()
 
    'Valider impression
       Select Case CheckBox1.Value
        Case True:  Sheets("Impression de l'ensemble").Select
                    Range("A1:J21").Select
        Case False:
    End Select
    Select Case CheckBox2.Value
        Case True:  Sheets("Impression de l'ensemble").Select
                    Range("A22:J42").Select
        Case False:
     End Select
    Select Case CheckBox3.Value
        Case True:  Sheets("Impression de l'ensemble").Select
                    Range("A43:J63").Select
        Case False:
    End Select
    Select Case CheckBox4.Value
        Case True:  Sheets("Impression de l'ensemble").Select
                    Range("A64:J84").Select
        Case False:
    End Select
    Select Case CheckBox5.Value
        Case True:  Sheets("Impression de l'ensemble").Select
                    Range("A85:J105").Select
        Case False:
    End Select
 
End Sub
Le problème avec ce code, il n'accumule pas les plages sélectionnés du style : Range("A64:A84,A85:J105").select

Auriez vous une solution pour que chaque case coché permettent de maintenir les plages sélectionnés.

Merci d'avance

Aurel ++