anticiper un bug

[jane]

Bonsoir à tous,

Voilà, j'ai créer une macro dont le but est d'effectuer un calcul . Elle se présente sous la forme d'une userform avec des textbox dans lesquelles l'utilisateur rentre ses valeurs, puis en actionnant un bouton le calcul se fait. J'aimerais bien savoir comment faire pour éviter les bugs, car si l'utilisateur se trompe et n'entre aucune valeur la boite de dialogue d'erreur VBA se met en route et là si tu sais pas c'que c'est que vba tu pédales dans la choucroute...de même si l'utilisateur rentre du texte au lieu de nombre.....Alors ce soir je sais pas si je suis fatiguée mais j'aurais besoin d'une bonne astuce!

Merci.

 

[Mytå]

Bonsoir jane et le forum

Sur ton bouton valider tu peux verifier si tes champs sont remplis

Exemple

Private Sub OKButton_Click()

If TextName1.Text = "" Then
MsgBox "Veuillez saisir un nom."
TextName1.SetFocus
Exit Sub
End If
If Not IsNumeric(TextName2.Text) Then
MsgBox "Veuillez saisir un nombre."
TextName2.SetFocus
Exit Sub
End If
End Sub

A suivre

P.S. Prière d'accuser réception si cela te convient
ou ne convient pas en répondant sur ce Post ... Merci !

 

[popeye]

sinon ya la methode vieux bourrin ;o)

on error resume next
tu places ca au debut de chaque fonction et hop c parti
par contre ca peut faire planter (genre une boucle infinie ou un truc du genre)

(tinkiete t pas obligé de répondre ce coup ci ;o)

 

[jane]

ouais encore merci ça marche du feu de zeus! juste un plus, comment on fait pour cumuler les conditions? and existe ou....et setfocus kesako?

 

[popeye]

setfocus en fait ca sert a "s"lectionner" l'élément
si tu fais un setfocus sur un textbox tu peux directement écrire
sinon pour les conditions tu peux mettre

truc=machine and truc <>bazard or youpi=content