XL 2010 Textbox valeur limitée

[Scorpio]

Bonsoir à tous,
J'ai ici un formulaire avec plusieurs TextBox. Et dans le premier textbox seulement, le textbox1, qui est limité à 3 chiffres, j'aimerais savoir si c'est possible de faire une limite de valeur par exemple jusqu'à 300.
Pourriez-vous s'il vous plaît me donner un petit coup de pouce, merci d'avance.
A+++

 

[Scorpio]

Re bonjour,
J'ai trouvé Hi Ha, pour ce coup, pas besoin d'aide du Forum. Merci pour ce que vous faite, et à bientôt

 

[Robert]

Bonjour Scorpio, bonjour le forum,

Rajoute cette procédure à ta UserForm :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
With Me.TextBox1
    If .Value > 300 Then
        Cancel = True
        MsgBox "Ce champ a une valeur maximale limitée à 300 !"
        .SelStart = 0
        .SelLength = Len(.Value)
        .SetFocus
    End If
End With
End Sub

 

[Scorpio]

Salut Robert,
Merci de votre aide, super
A++++