Microsoft Visual Basic pour Applications (VBA) permet aux programmeurs d`utiliser différents objets de contrôle sur les formulaires utilisateur. L`objet peut correspondre à la boîte, l`image, la barre ou le bouton de défilement des contrôles. Un bouton à bascule sur un formulaire est un contrôle utilisé pour afficher une "Oui Non" La valeur à partir d`une source de données. Les développeurs de logiciels utilisent des boutons bascule dans un groupe d`options avec d`autres boutons et boîtes de dialogue pour accepter l`entrée de l`utilisateur. Lorsque vous cliquez sur un objet de bouton à bascule, il semble être pressé ou poussé vers le bas. Vous devez obtenir la valeur d`un contrôle de bouton à bascule pour activer le bouton à bascule en VBA.
Clique le "Démarrer" bouton dans Windows et sélectionnez la "Microsoft Excel" du "Tous les programmes" menu pour ouvrir un nouveau classeur.
Clique le "Outils," "Macro" et "Visual Basic Editor".
Cliquez "Insérer," puis "UserForm" pour insérer un formulaire utilisateur dans votre classeur.
Ajouter le "Bouton à bascule" et "Étiquette" les contrôles sur le formulaire utilisateur.
Double-cliquez sur le "Bouton à bascule" commande pour ouvrir la "Code" fenêtre pour le contrôle ToggleButton.
Entrez le code suivant pour la "événement ToggleButton1Click:
Private Sub ToggleButton1_Click ()
Si ToggleButton1.Value = True Then
`Set UserForm arrière-plan rouge.
Me.BackColor = RGB (255, 0, 0)
Autre
`Set UserForm arrière-plan bleu.
Me.BackColor RVB = (0, 0, 255)
Fin si
End Sub
Clique le "Exécuter Sub / UserForm" sur le "Courir" menu pour activer le bouton à bascule dans votre contrôle VBA.