SPINBUTTON ET TEXTBOX

REDJFA · 9 Mars 2005

BONJOUR,

je réalise actuellement une userform sur excel
et je souhaite creer un compteur avec l objet spinbutton
et TextBox.
je voudrait agrementer ou desagrementer jusqu'a la valeur 0
(donc pas de chiffre negative)
Donc le spinbutton est mon outils de compteur et textbox affiche les valeur.
ATTENTION !!!
A chaque appel de la procedure le compteur doit etre mis a 0
Si quelqu'un peut m'aider cela serait SUPERRRRRRRR
CORDIALEMENT
aitaddif@yahoo.fr

Hervé · 10 Mars 2005

Bonjour

Code à placer dans ton userform :

Private Sub SpinButton1_Change()
SpinButton1.Min = 0
TextBox1.value = SpinButton1.value
End Sub

Par contre, je n'ai pas compris ton histoire de remise à zéro ???

a plus

HERVE · 10 Mars 2005

Hervé écrit:

Bonjour

Code à placer dans ton userform :

Private Sub SpinButton1_Change()
SpinButton1.Min = 0
TextBox1.value = SpinButton1.value
End Sub

Cliquez pour agrandir...

Par contre, je n'ai pas compris ton histoire de remise à zéro ???

a plus

TOUT D'ABORD UN GRAND MERCI HERVE
POUR M'AVOIR AIDER.
C'EST VRAIMENT SUPER SYMPA !!!!!

En ce qui concerne la remise a zero c'est que je serais amener
a appeler plusieurs fois cette procedure
et il faut que la valeur de départ soit de 0
à chaque fois.

Akeya06 · 14 Mars 2005

Salut REDJFA, Hervé

Pour ce qui est de la remise a zero, il suffit de d'affecter le code suivant au boutton qui lance la procédure :

Private Sub commandbutton1_click()
SpinButton1.Min = 0
SpinButton1.Max= 100 'si tu as un maximum
TextBox1.value = SpinButton1.value
textbox1.value = 0
End sub

Je l'ai fait pour une de mes applications et ca marche...

A+

SPINBUTTON ET TEXTBOX

REDJFA

Guest

Hervé

XLDnaute Barbatruc

HERVE

Guest

Akeya06

XLDnaute Occasionnel

Discussions similaires