VBA Excel Prob division par zéro ???

Fermé
Novasim220
Messages postés
15
Date d'inscription
jeudi 22 décembre 2005
Statut
Membre
Dernière intervention
2 janvier 2006
- 26 déc. 2005 à 10:55
Novasim220
Messages postés
15
Date d'inscription
jeudi 22 décembre 2005
Statut
Membre
Dernière intervention
2 janvier 2006
- 27 déc. 2005 à 07:31
Bonjour à tous,
voila mon problème : je fais un calcul mais qui ne fonctionne pas, l'erreur est division par zéro ????
Private Sub TxtDébitDésiré_Change()
With FeuilledesaisieCTA
.TxtVitesseDésirée.value = Val(TxtDébitDésiré) / Val(TxtSurface) / 3600 / 1000000
End With
End Sub

sachant que val(TxtSurface) peut etre avec décimale

OU est l'erreur ????
Merci pour votre aide

1 réponse

Gihef
Messages postés
5137
Date d'inscription
mercredi 20 juillet 2005
Statut
Contributeur
Dernière intervention
27 mai 2022
2 768
26 déc. 2005 à 22:44
Bonjour,

Es-tu sûr que TxtSurface est <>0 avant d'entrer dans ta Sub ?
0
Novasim220
Messages postés
15
Date d'inscription
jeudi 22 décembre 2005
Statut
Membre
Dernière intervention
2 janvier 2006

27 déc. 2005 à 07:31
Salut Gihef,
merci pour ta réponse, mais problème résolu:
ma valeur était bien différente de 0 mais il fallait la convertir a cause de la virgule
Merci quand même
@+
0