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 vote238 views1 answer
Supprimer la valeur de celule vba
VBA
0 vote228 views1 answer
Excel vba copy entire sheet paste values
VBA
1 vote236 views1 answer
Add rows to datagridview vb.net
VBA
0 vote232 views1 answer
Excel vba linter
VBA
0 vote235 views1 answer
Menus act like radio buttons vb.net
VBA
0 vote224 views1 answer
Vb check if row has column
VBA
0 vote213 views1 answer
Excel vba concatenate range
VBA
0 vote231 views1 answer
Rotate image by any angle vb.net
VBA
0 vote255 views1 answer
Amd64 vs arm64 linux
VBA
0 vote219 views1 answer
How to set location and size of new from vb
VBA