Saisie obligatoire VBA

Résolu/Fermé
2pax.cruz - 1 juil. 2010 à 09:26
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 - 2 juil. 2010 à 08:27
Bonjour,

j'ai crée un formulaire afin d'insérer des enregistrements dans une liste en excel.
Sauf que j'aimerais qu'un champ soir obligatoire. Et que si il n'est pas rempli, il y ait un message d'erreur ou bien que le bouton OK ne soit pas disponible.


Merci.

3 réponses

Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 288
1 juil. 2010 à 09:56
proposition :
dans ton boyon de validation ( ici commandButton1)
tu contrôles tous les champs obligatoires donc si tu en as trois
tu recopies cette boucle 3 fois (If Userf..... End If)
Si besoin tu montres ce que tu as et tu demandes
A+


Private Sub CommandButton1_Click()

If UserForm1.TextBox1.Value = "" Then
    s = MsgBox("Le champ : " & Label1 & " est obligatoire", vbCritical, "Erreur de saisie")
    UserForm1.TextBox1.SetFocus
    Exit Sub
End If

End Sub
0
Un grand merci.
0
rugabo Messages postés 3 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 1 juillet 2010
1 juil. 2010 à 16:42
je s8 en 1ere année et g doi présenter une db access qui doit déclencher une alarme en boîte de dialogue tous les 15 jours avant une date d'expiration des produits d'une pharmacie. Comment sa se fé, en vb ou seulement avec access.
0
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 288
2 juil. 2010 à 08:27
@rugabo
>> quelques règles : 1) ouvrir son post pour son probleme pour avoir des réponses personnalisées
2) Eviter l'écriture sms 3 ) expliquer clairement le besoin
pour ton problème j'utiliserai vba dans access mais tu n'as rien précisé sur la manière dont est utilisée la base de données.
Donc Voilà ce que tu vas faire Tu commences au 1 puis 2 et surtout le 3.
.... Bye
0