Spinbutton

Bonjour,

SpinButton1.Value = rst

j'initialise mon userform par ca et il me fait la macro

Private Sub SpinButton1_Change()

alors que c'est pendant ma phase d'initialisation...

je veux remettre au point de départ mon spinbutton quand j'ai fini de le réutiliser en faite...

bien cordialement,

Naubin

Bonjour Naubin, bonjour le forum,

Pas sûr d'avoir bien compris... Pourquoi réinitialiser le SpinButton à l'initialisation de l'UserForm alors que justement tous les contrôles ont leur valeur par défaut.

Je ferai la réinitialisation de ce SpinButton à la fin de la macro de validation de l'UserForm, dans le code d'un CommandButton...

Bonjour à tous,

En fait SpinButton1_Change est une procédure "événementielle", donc qui s'active suite à l'événement changement d'une des propriétés du contrôle.

En changeant la valeur du SpinButton, il est donc normal que s'active la SpinButton1_Change

Ce qu'on peut faire c'est :

* d'utiliser un drapeau public, par exemple en déclarant au début d'un module quelconque :

Public Init as boolean

* ensuite avant de modifier la valeur du SpinButton, on indique :

Init = true
SpinButton1.Value = rst

* et dans la SpinButton1_Change :

Private Sub SpinButton1_Change()
    if init then exit sub
    ' ...

La variable Init est remise à false soit à la fin du UserForm_Initialize ou du UserForm_Activate (si utilisée)

Pierre

Rechercher des sujets similaires à "spinbutton"