mise à zero de Textbox contenant des formules

[zeb83]

Bonsoir,

j'ai un petit problème dans une mise à zéro de textbox après validation.
En fait il s'agit d'un textbox contenant un calcul de nombre de jours entre deux dates.

Macro pour le calcul du nombre de jours :
Private Sub TextBox3_Change()
TextBox3.Value = Str(DateValue(TextBox2.Value) - DateValue(TextBox1.Value) + 1)
End Sub

pour mettre à blanc les textbox, j'ai tapé

textbox1.value =''
textbox2.value =''
textbox3.value =''

Merci pour votre aide.

 

[Zeb83]

Y a t il quelqu'un pour m'aider ?

 

[Franck]

Salut zeb

Je suis pas sur d'avoir bien compris ton pb mais vu ton code je pense que tu plante car tu tourne en rond


quand tu commande textbox3.value ='' tu appel Private Sub TextBox3_Change() qui donc recalcul

Tu pourait peut etre eviter Private Sub TextBox3_Change()
et le remplacer par un bouton

a+ Franck