Curseur borné

bonjour,

comment peut on faire pour borner un curseur avec des valeurs min et max étants dans 2 cellules ?

ex:

min en a1: 10

max en a2: 50

en a3 la valeur du curseur ne pouvant aller que de 10 à 50, et ceci avec un curseur active X ?

merci

Bonjour

Pas trop compris l'histoire de "curseur"

Ce que vous voulez faire c'est limiter la valeur en A3 sur base de A1 et A2 ?

En gros, si A3 descend en dessous de A1 ou va au dessus de A2, cela vous renvoie un message et vous met la valeur A3 à 10 ou à 50 selon le cas ?

A vous relire

Bonjour,

C'est quoi ce "curseur" ?

Bonjour,

s'il s'agit d'une toupie ou d'un ascenseur fixer ses propriétés sur l'événement Change des cellules :

Private Sub Worksheet_Change(ByVal Target As Range)
    Select Case Target.Address
    Case "$A$1"
        SpinButton1.Min = [A1]
        SpinButton1.Value = Application.Max(SpinButton1.Min, SpinButton1.Value)
    Case "$A$2"
        SpinButton1.Max = [A2]
        SpinButton1.Value = Application.Min(SpinButton1.Max, SpinButton1.Value)
    End Select
End Sub

eric

désolé, j'arrive avec 10 ans de retard.

je viens de coller la macro dans un fichier, mais je ne sais comment lier le spin bouton ?

Pas bonjour non plus...

Je ne vois pas de macro dans ton fichier.

Comment ça le lier ? A une cellule ?

Propriété LinkedCell.

eric

elle est dans le workbook

bonjour,

Voir pièce jointe.

A+

salut,

merci ça fonctionne , par contre, si je veux avoir 10 curseurs sur la même feuille, j'ai tenté de dupliquer la macro, mais sans succès.

Je venais juste de trouver une autre solution par formule que je joins

à+