More

    Comment créer des formulaires interactifs dans Excel VBA avec des contrôles ActiveX

    Autres articles intéressants

    4. Case à cocher

    Check Box est un contrôle qui permet à l’utilisateur de sélectionner l’option Ya/Tidak ou True/False. Ceci est utile pour les entrées binaires telles que la confirmation du consentement, la sélection d’une fonctionnalité ou l’activation/désactivation d’une fonction dans un formulaire.

    Utilisation de la case à cocher pour enregistrer les valeurs vrai/faux

    Pour ajouter un Check Box dans Excel VBA, procédez comme suit :

    1. Ouvrez l’  onglet Developer dans Excel.
    2. Cliquez sur Insert > Check Box (ActiveX Controls).
    3. Cliquez et faites glisser pour placer le Check Box sur la feuille de calcul.
    4. Faites un clic droit sur Check Box > Properties.

    Exemple de code VBA pour connecter une case à cocher à une cellule

    Pour que Check Box stocker des valeurs dans des cellules en fonction de leur état, utilisez le code suivant :

    If CheckBox1.Value =True Then
 Range(“D2”).Value  1
Else
 Range(“D2”).Value = 0
End If

    Ce code remplira D2 cellules avec 1 si le Check Box est coché et 0 s’il n’est pas coché.

    Pour que cette fonction s’exécute automatiquement lorsque l’utilisateur clique sur Check Box, utilisez event Change à l’intérieur du VBA Editor :

    Private Sub CheckBox1_Click()
 If CheckBox1.ValueTrue Then
 Range(“D2”).Value  1
 Else
 Range(“D2”).Value = 0
 End If
End Sub

    5. Boutons d’option

     Les Check Box et Option Buttons sont utilisés pour fournir des options aux utilisateurs, mais il existe des différences importantes entre les deux :

    CaractéristiqueCheck BoxOption Buttons
    FonctionPermet aux utilisateurs de choisir plus d’une optionUne seule option peut être sélectionnée dans un groupe
    Type d’entréeValeur binaire (Vrai/Faux)Options exclusives (une seule option active dans un groupe)
    UtiliserUtilisé pour activer/désactiver des fonctionnalitésUtilisé pour choisir l’une des nombreuses options
    Exemples d’utilisationChoisir des fonctionnalités supplémentaires dans un formulaireChoisissez un sexe ou un mode de paiement

    Si l’utilisateur doit sélectionner plusieurs options, utilisez Check Box. Cependant, si vous ne pouvez choisir qu’une seule des options parmi plusieurs options, utilisez Option Buttons.

    Étapes de création d’un bouton de sélection dans Excel VBA

    1. Ouvrez Excel et activez l’  onglet Developer.
    2. Sélectionnez Developer > Insert > Option Button (ActiveX Controls).
    3. Cliquez et faites glisser pour placer deux Option Buttons sur la feuille de calcul.
    4. Faites un clic droit sur chaque Option Button puis sélectionnez Properties.
      • Renommez (Name) en OptionButton1 et OptionButton2.
      • Changez le Caption en « Mâle » pour OptionButton1 et « Femelle » pour OptionButton2.
    5. Pour regrouper les deux boutons, placez-les dans Frame (ActiveX Controls) ou sur le UserForm.

    Exemple de code VBA pour la connexion de touches de sélection avec des cellules

    Le code suivant stockera une sélection de l’Option Button dans la cellule D3 selon le choix de l’utilisateur :

    If OptionButton1.Value =True Then Range(“D3”).Value “Male”
If OptionButton2.Value =True Then Range(“D3”).Value “Female”

    Pour vous assurer que ce code s’exécute automatiquement lorsque l’utilisateur clique sur le bouton, utilisez les événements VBA suivants :

    Private Sub OptionButton1_Click()
 Range(“D3”).Value =“Male”
End Sub

Private Sub OptionButton2_Click()
 Range(“D3”).Value =“Female”
End Sub

    Avec ce code, D3 cellules seront automatiquement mises à jour en fonction des choix effectués par l’utilisateur.

    Dernières articles

    Articles Connexes