Problème avec les Checkbox !
Aurélie
-
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
Bonsoir à tous,
Je cherche à selectionner plusieurs cellules en cochant des CheckBox à partir d'un CommandButton mais ...
If CheckBox1 = True Then Range("b2:c2").Select
If CheckBox2 = True Then Range("b3:c3").Select
If CheckBox3 = True Then Range("b4:c4").Select
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.
Si vous avez une solution, Merci d'avance.
Aurélie
Je cherche à selectionner plusieurs cellules en cochant des CheckBox à partir d'un CommandButton mais ...
If CheckBox1 = True Then Range("b2:c2").Select
If CheckBox2 = True Then Range("b3:c3").Select
If CheckBox3 = True Then Range("b4:c4").Select
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.
Si vous avez une solution, Merci d'avance.
Aurélie
Configuration: Windows XP Internet Explorer 7.0
2 réponses
-
Bonjour,
J'essaierai qcq chose comme :
Dim plage As Range
If CheckBox1 Then plage = Range("b2:c2")
If CheckBox2 Then plage = Union(plage, Range("b3:c3"))
If CheckBox3 Then plage = Union(plage, Range("b4:c4"))
plage.Select
eric -
difficile de dire sans la totalité du code...
Ajoute quand même Set plage = "" avant le 1er if
eric
