VBA je suis coincé !!!
Stéphanie
-
CapitainCo Messages postés 127 Statut Membre -
CapitainCo Messages postés 127 Statut Membre -
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
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
A voir également:
- VBA je suis coincé !!!
- Excel compter cellule couleur sans vba - Guide
- Grain de riz coincé dans iphone - Forum iPhone
- Dépassement de capacité vba ✓ - Forum Excel
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum VB / VBA
1 réponse
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
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
