Discussion :

[Fabious62]

bonjour tlm

Alors voilà je bosse sur un tp pour mon cours de programmation (par excel)

Je suis encore débutant et j'ai une question qui pourrait vous paraitre idiot mais meme en cherchant dans la F.a.q je n'ai pas trouvé

voilà mon bout de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
     If text1.Value = "" And text2.Value = "" Then
        MsgBox ("Veuillez saisir l'intitulé et le montant")
    ElseIf text1.Value = "" Then MsgBox ("Veuillez saisir l'intitulé")
    ElseIf text2.Value = "" Then MsgBox ("Veuillez saisir le montant du débit")
    End If
    If calendar.Day = 0 Then MsgBox ("Veuillez choisir une date")

Mais a part afficher le msgbox, le prog inscrit qd meme les données sous la feuille, il y a t'il donc une ligne permettant à l'utilisateur de pouvoir resaisir ce qu'il manque sans que la fenetre se ferme ? (le userform)

Merci d'avance !

[mortalino]

Salut,

il te faut l'instruction Exit Sub !

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
If text1.Value = "" And text2.Value = "" Then
    MsgBox ("Veuillez saisir l'intitulé et le montant"): Exit Sub
ElseIf 
    text1.Value = "" Then MsgBox ("Veuillez saisir l'intitulé"): Exit Sub
ElseIf 
    text2.Value = "" Then MsgBox ("Veuillez saisir le montant du débit"): Exit Sub
End If
If calendar.Day = 0 Then MsgBox ("Veuillez choisir une date")

@++

[Fabious62]

Ah et bien merci bcp !!!

C'est exactement ce qu'il me fallait ^^