mercredi 8 avril 2015

UserForm Optellen met decimaal 0,01 tussen 0 en 1.

Hallo,

Ik probeer een UserForm uit met een TextBox en een SpinButton.

Minimum = 0 en Maximum is 1.

Het optellen of aftrekken gebeurt met decimaal 0.01



Het lukt mij maar niet dit te verwezenlijken.

Ook niet na wat speurwerk op het Net.

Kan iemand mij hieruit helpen?

Bedankt alvast,

Luc.



Private Sub spinbutton1_change()

TextBox1.Value = Format(SpinButton1.Value + 0.01)

End Sub



Private Sub TekstBox1_change()

SpinButton1.Value = 0

End Sub


Bijgevoegde Bestanden







UserForm Optellen met decimaal 0,01 tussen 0 en 1.

0 commentaires:

Enregistrer un commentaire