VBA je suis coincé !!!

Stéphanie -  
CapitainCo Messages postés 126 Date d'inscription   Statut Membre Dernière intervention   -
Bonsoir,

Je cherche à selectionner plusieurs cellules en cochant des CheckBox à partir d'un CommandButton mais ...

le problème c'est qu'il me sélectionne uniquement cellules de la dernière ligne (b4:c4) alors que moi je voudrai qu'il me sélectionne tout les cellules sélectionnée par les CheckBox.

If CheckBox1 = True Then Range("b2:c2").Select
If CheckBox2 = True Then Range("b3:c3").Select
If CheckBox3 = True Then Range("b4:c4").Select

Merci d'avance, pour précieuse aide.

Stéphanie

1 réponse

Réponse 1 / 1
CapitainCo Messages postés 126 Date d'inscription   Statut Membre Dernière intervention   61
 
If CheckBox1 = True And CheckBox2 = False And CheckBox3 = False Then
Range("b2:c2").Select
ElseIf CheckBox2 = True And CheckBox1 = False And CheckBox3 = False Then
Range("b3:c3").Select
ElseIf CheckBox3 = True And CheckBox1 = False And CheckBox2 = False Then
Range("b4:c4").Select
ElseIf CheckBox1 = True And CheckBox2 = True And CheckBox3 = False Then
Range("b2:c3").Select
ElseIf CheckBox1 = True And CheckBox3 = True And CheckBox2 = False Then
Range("b2:c4").Select
ElseIf CheckBox2 = True And CheckBox3 = True And CheckBox1 = False Then
Range("b3:c4").Select
ElseIf CheckBox1 = True And CheckBox2 = True And CheckBox3 = True Then
Range("b2:c4").Select
End If

le code en réaliser pour marcher sur un bouton, par sur le clique des checkboxs mais sit u veux le mettre sur les checkbox tu dois repeter 3 fois le code, mais je pense pas que cela soit ton objectif
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Comment enlever mon chargeur du ...........
Claclou -
VortexUrukog -

1 réponse
Embout cassé... comment le retirer ?
Carpace -
Darismel -

5 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

10 réponses