More

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

    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.

    Autres articles intéressants

    6. Bouton de rotation

    Spin Button est un contrôle utilisé pour augmenter ou diminuer progressivement la valeur numérique d’une cellule. Ceci est particulièrement utile pour les entrées numériques, telles que la définition du nombre de biens, des taux d’intérêt ou d’autres paramètres qui ont des limites de valeur.

    Comment définir les valeurs maximale et minimale dans le bouton Spin

    1. Ouvrez l’  onglet Developer dans Excel.
    2. Cliquez sur Insert > Spin Button (ActiveX Controls).
    3. Cliquez et faites glisser pour placer le Spin Button sur la feuille de calcul.
    4. Faites un clic droit sur le Spin Button, puis sélectionnez Properties.

    Exemple de code VBA pour régler le bouton de rotation

    Utilisez le code suivant pour définir la limite de valeur Spin Button :

    SpinButton1.Max =100
SpinButton1.Min =0

    Pour connecter Spin Button avec des cellules dans Excel, utilisez le code suivant :

    Private Sub SpinButton1_Change()
 Range(“C3”).Value =SpinButton1.Value
End Sub

    Ce code garantira que chaque fois que l’utilisateur appuie sur la touche Spin Button, les valeurs de la cellule C3 changeront en fonction des valeurs définies dans les commandes.

    Dernières articles

    Articles Connexes