K
keno
Guest
Bonjour,
Voici un petit code donnant une erreur 'dépassement de capacité'.
Le résultat du calcul fait 33143, ce qui rentre normalement dans les capacités d'un double.
En décomposant le calcul, cela fonctionne, mais pas en un seul bloc.
Quelqu'un aurait une idée ?
D'avance, merci.
Voici un petit code donnant une erreur 'dépassement de capacité'.
Le résultat du calcul fait 33143, ce qui rentre normalement dans les capacités d'un double.
En décomposant le calcul, cela fonctionne, mais pas en un seul bloc.
Quelqu'un aurait une idée ?
D'avance, merci.
Code:
Sub test()
Dim azerty As Double
azerty = 23
azerty = 12 * 60 + azerty
azerty = 3600 * 9 + azerty
MsgBox 'ok' 'Jusqu'ici, tout va bien
azerty = (3600 * 9) + (12 * 60) + 23 'Et là, ça plante...
End Sub