Le contrôle SpinButton (Toupie)

Private Sub UserForm_Initialize()
    With SpinButton1
        .Min = 0 'Valeur mini
        .Max = 100 'Valeur maxi
        
        'Spécifie le déplacement se produisant lorsque l'utilisateur clique sur
        'les flèches de défilement dans le contrôle SpinButton
        '(La valeur par défaut = 1)
        .SmallChange = 5
    End With
End Sub


Private Sub SpinButton1_Change()
    Label1 = SpinButton1.Value
End Sub

Source: silkyroad.developpez.com

Similar codes

0 vote126 views1 answer
Menus act like radio buttons vb.net
VBA
0 vote125 views1 answer
Remove series name from legendvbnet
VBA
1 vote121 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
2 votes126 views1 answer
Vba round number
VBA
0 vote127 views1 answer
VBA Sort RossetaCode
VBA
0 vote111 views1 answer
Docker vboxmanage not found
VBA
0 vote117 views1 answer
Find days in month vba
VBA
0 vote136 views1 answer
Programmatically copy data from one workshet to another excel
VBA
0 vote128 views1 answer
Vba table header name
VBA
0 vote129 views1 answer
Vba file chooser
VBA