Un bouton rotatif peut être utilisé pour incrémenter un nombre dans une cellule. Créer un bouton de rotation dans Excel VBA, exécutez les étapes suivantes.
1. Dans l'onglet Développeur, cliquez sur Insérer.
2. Dans le groupe Contrôles ActiveX, cliquez sur Bouton Spin.
3. Faites glisser un bouton de rotation sur votre feuille de calcul.
4. Cliquez avec le bouton droit sur le bouton de rotation (assurez-vous que le mode Conception est sélectionné).
5. Cliquez sur Afficher le code.
Remarque : vous pouvez modifier le nom d'un champ en cliquant avec le bouton droit sur le champ (assurez-vous que le Mode Conception est sélectionné) puis en cliquant sur Propriétés. Pour l'instant, nous laisserons SpinButton1 comme nom du bouton de rotation.
6. Pour lier ce bouton rotatif à une cellule, ajoutez la ligne de code suivante.
Range("C3").Valeur = SpinButton1.Value
7. Vous pouvez définir un maximum et un minimum en ajoutant les lignes de code suivantes.
SpinButton1.Max = 100
SpinButton1.Min = 0
8. Pour modifier la valeur incrémentielle, utilisez la propriété SmallChange.
SpinButton1.SmallChange = 2
9. Cliquez sur les flèches du bouton de rotation (assurez-vous que Mode Conception est désélectionné).
Résultat:
Remarque : au lieu de modifier les propriétés du bouton rotatif au moment de l'exécution, vous pouvez également modifier les propriétés au moment de la conception. Pour ce faire, faites un clic droit sur le bouton de rotation (assurez-vous que le mode conception est sélectionné) et cliquez sur propriétés.
