P
Pat
Guest
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 ???? Problème de format ????
Merci pour votre aide
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 ???? Problème de format ????
Merci pour votre aide