En VBA, vous pouvez créer un Case à cocher où un utilisateur peut cocher ou décocher l'option. Une case à cocher est souvent utilisée dans les formulaires utilisateur, mais peut également être utilisée dans une feuille de calcul. Dans ce didacticiel, vous apprendrez à créer une case à cocher, à obtenir un choix d'utilisateur dans VBA et à l'utiliser dans le code.
Si vous voulez apprendre à créer une Listbox, cliquez ici : VBA Listbox
Si vous voulez apprendre à créer une Combobox, cliquez ici : VBA Combobox
Créer une case à cocher
Pour insérer une case à cocher dans la feuille de calcul, vous devez aller à la Onglet Développeur, Cliquez sur Insérer et sous Contrôles ActiveX choisissez Case à cocher :
Image 1. Insérer une case à cocher dans la feuille de calcul
Lorsque vous sélectionnez la case à cocher que vous avez insérée, vous pouvez cliquer sur Propriétés sous le Onglet Développeur:
Image 2. Modifier les propriétés de la case à cocher
Ici, vous pouvez définir différentes propriétés de la case à cocher. Pour le début, nous avons changé l'attribut Nom à cmbcase à cocher. Maintenant, nous pouvons utiliser la case à cocher avec ce nom en code VBA.
De plus, nous avons changé le texte qui apparaît à côté de la case à cocher en D'accord avec les conditions. Pour ce faire, vous devez définir l'attribut Légende.
Obtenir un élément sélectionné d'une case à cocher dans VBA
Le but d'une Checkbox est d'obtenir un choix de l'utilisateur (case cochée ou non). Afin de récupérer une valeur sélectionnée par l'utilisateur, vous devez utiliser ce code :
| 123456789 | Si Sheet1.chbCheckBox.Value = True AlorsSheet1.Range("C3") = "D'accord"AutreSheet1.Range("C3") = "Pas d'accord"Fin si |
Nous voulons remplir la cellule C3 avec Se mettre d'accord si la case est cochée et Pas d'accord autrement. La valeur de la case à cocher est dans leValeur attribut de l'objet Feuille1.chbcase à cocher. La valeur de la case à cocher peut être vraie ou fausse.
Image 3. Obtenez une valeur sélectionnée à partir de la case à cocher dans VBA
Comme nous avons coché la case, la valeur de Sheet1.chbCheckbox.Value est vrai, donc le résultat dans C3 est Se mettre d'accord.
Utiliser une case à cocher dans un formulaire utilisateur
Comme nous l'avons mentionné, Checkbox est le plus souvent utilisé dans les Userforms. Pour expliquer comment vous pouvez le faire, nous allons d'abord insérer un Userform. Dans l'éditeur VBA, faites un clic droit sur le nom du module, cliquez sur Insérer et choisissez Formulaire utilisateur:
Image 8. Insérer un formulaire utilisateur
Pour afficher les commandes d'insertion, vous devez activer le Boîte à outils. Pour ce faire, cliquez sur leBoîte à outils icône dans la barre d'outils. Après cela, vous obtiendrez les fenêtres avec tous les contrôles disponibles. Vous pouvez cliquer sur Case à cocher pour le créer dans le Userform :
Image 9. Insérer une case à cocher dans le formulaire utilisateur
Dans la fenêtre des propriétés, nous allons changer le nom de la case à cocher en chbCheckBox et légende à D'accord avec les conditions. Lorsque nous exécutons le formulaire utilisateur, nous obtenons la case à cocher.
Image 10. La case à cocher dans le formulaire utilisateur
Si vous souhaitez obtenir la valeur sélectionnée à partir de la case à cocher, vous devez utiliser la même logique pour la case à cocher dans une feuille de calcul, qui est expliquée plus haut dans l'article.
