Condition sur textbox

  • Initiateur de la discussion Initiateur de la discussion plumazon
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

plumazon

XLDnaute Occasionnel
Bonsoir


j'aimerai mettre une condition sur un textbox

ci joint fichier explicatif


Mille merci [file name=Classeur1_20060511220608.zip size=7690]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060511220608.zip[/file]
 

Pièces jointes

Salut,

Private Sub CommandButton1_Click()
If Range('A2').Value - Val(TextBox1.Value) inf 0 Then
MsgBox 'attention'
Exit Sub
Else
Range('b2').Value = TextBox1.Value
End If
End Sub

Changer inf par le signe ad hoc
 
Salut Plumazon,

Il te suffit de modifier ton code de la manière suivante :
Code:
Private Sub CommandButton1_Click()
If Val(TextBox1.Value) < Cells(2, 1).Value Then
    MsgBox 'veuillez saisir une valeur supérieure au stock'
    Exit Sub
End If
Range('b2').Value = TextBox1.Value
End Sub

@+

Edition : Salut Lio, pas rafraichit 😉

Message édité par: porcinet82, à: 11/05/2006 22:29
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
11
Affichages
257
Réponses
6
Affichages
171
  • Question Question
Microsoft 365 Contrôle sur date
Réponses
8
Affichages
277
Réponses
2
Affichages
78
Réponses
5
Affichages
382
Retour