VBA Excel Prob division par zéro ???

Novasim220 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -  
Novasim220 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

1 réponse

Gihef Messages postés 5150 Date d'inscription   Statut Contributeur Dernière intervention   2 779
 
Bonjour,

Es-tu sûr que TxtSurface est <>0 avant d'entrer dans ta Sub ?
0
Novasim220 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention  
 
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