Vba excel condition sur textbox, combobox
Résolu/Fermé
A voir également:
- Vba excel condition sur textbox, combobox
- Liste déroulante excel - Guide
- Excel cellule couleur si condition texte - Guide
- Formule excel - Guide
- Si et excel - Guide
- Aller à la ligne sur excel - Guide
2 réponses
gillesdemev
Messages postés
135
Date d'inscription
mercredi 17 janvier 2007
Statut
Membre
Dernière intervention
11 mai 2010
23
14 janv. 2009 à 08:03
14 janv. 2009 à 08:03
Bonjour rouzb
Voici ce que je te propose
dans les
Private Sub TextBox1_Change()
testnum = IsNumeric(UserForm1.TextBox1)
If testnum = False Then
MsgBox "valeur nom numérique"
End If
End Sub
A tout à l'heure pour la suite
Voici ce que je te propose
dans les
Private Sub TextBox1_Change()
testnum = IsNumeric(UserForm1.TextBox1)
If testnum = False Then
MsgBox "valeur nom numérique"
End If
End Sub
A tout à l'heure pour la suite
gillesdemev
Messages postés
135
Date d'inscription
mercredi 17 janvier 2007
Statut
Membre
Dernière intervention
11 mai 2010
23
14 janv. 2009 à 08:34
14 janv. 2009 à 08:34
la suite ,
Liste déroulante :
Dans un userform je connais ListBox et ComboBox
avec listbox le premier item des la liste est sélectionné par défaut
on peut mettre une petite "case à cocher" devant chaque item de façon automatique en modifiant le paramètre
Styles du contrôle ListBox (voir aide ) dans microsoft visual basic
Dans ce cas la première case à cocher est cliquée
Avec Combobox c'est différent .
Je suppose que derrière tu as un bouton pour lancer une action
J'ai fait ce test et ça marche bien si rien est sélectionné dans la liste de ComboBox1
et que le clique le bouton CommandButton1
J'ai bien le message
Private Sub ComboBox1_Change()
End Sub
Private Sub CommandButton1_Click()
If UserForm1.ComboBox1 = "" Then
MsgBox "choisir un item)"
End If
End Sub
Voilà
Je pense avoir répondu à tes 2 questions mais je vais te faie un aveu:
Je suis en train de faire un petit outil pour le club de Rugby de senlis et les essais que je viens de faire vont me servir aussi
Bonne journée
Liste déroulante :
Dans un userform je connais ListBox et ComboBox
avec listbox le premier item des la liste est sélectionné par défaut
on peut mettre une petite "case à cocher" devant chaque item de façon automatique en modifiant le paramètre
Styles du contrôle ListBox (voir aide ) dans microsoft visual basic
Dans ce cas la première case à cocher est cliquée
Avec Combobox c'est différent .
Je suppose que derrière tu as un bouton pour lancer une action
J'ai fait ce test et ça marche bien si rien est sélectionné dans la liste de ComboBox1
et que le clique le bouton CommandButton1
J'ai bien le message
Private Sub ComboBox1_Change()
End Sub
Private Sub CommandButton1_Click()
If UserForm1.ComboBox1 = "" Then
MsgBox "choisir un item)"
End If
End Sub
Voilà
Je pense avoir répondu à tes 2 questions mais je vais te faie un aveu:
Je suis en train de faire un petit outil pour le club de Rugby de senlis et les essais que je viens de faire vont me servir aussi
Bonne journée
