SpinButton rendre inactif en fin de course

Bonjour

J'ai un formulaire avec un SpinButton pour faire défiler des logos de banque, jusque là tous vas bien, actuellement j'ai mis 5 logos il devrais avoir environ une quinzaine de logo.

Ma demande j'aimerai que lorsque j'arrive au 5 éme logo que le SpinButton soit inactif que je puisse plus appuyer dessus ?

Si possible.

Par avance merci pour votre aide.

Un fichier valant mieux qu'un long discours, veuillez voir la pièce jointe.

Cordialement

36images-usf-bon.xlsm (57.32 Ko)

Bonsoir

Max18 a écrit :

le SpinButton soit inactif

Pour toi que veut dire inactif ?

Pour moi inactif veut dire que rien ne se passe et c'est le cas, car la valeur Max est atteinte

Salut le Forum

Vérifier le nombre d'images pour ajuster le max du SpinButton

Private Sub UserForm_Initialize()
Dim Ctrl As Control, Cpt As Byte
Cpt = 0

    For Each Ctrl In Me.Controls
        If TypeOf Ctrl Is MSForms.Image Then Cpt = Cpt + 1
    Next Ctrl
    With SpinButton1
        .Max = Cpt
        .Value = IIf(x > Cpt, Cpt, x)
        End With

End Sub

Mytå

Oups, je me sauve, le maître Excel est connecté . . .

Edit : Correction du code

Bonsoir Myta,

Je te remercie mais avant sa mémoriser la valeur du SpinButton pour garder la même image à la prochaine ouverture de l'USF. Et la je perd l'image a chaque ouverture?

Si tu peut y remédier se serais sympas !

@+

Max

Re le Forum

Max, j'avais édité ma ficelle. (2 messages vers le haut)

La correction avait été apportée au code.

.Value = IIf(x > Cpt, Cpt, x)

Mytå

Bonjour Mytå,

Je te remercie d'avoir répondu je n'avais pas fait attention à la correction du code qui avait été apportée. Il est exact que sa mémorise et garde la même image à la prochaine ouverture de l'USF.

Mais pourquoi que sa perd l'image lorsque tu ferme le fichier?

Y a t-il un moyen de remédier?

Je te remercie d'avance et te souhaite une bonne journée.

Max

Rechercher des sujets similaires à "spinbutton rendre inactif fin course"