Dépassement de capacité

Bonjour,

Problème sûrement commun pour vbiste débutant mais voila :

On m'indique un dépassement de capacité sur le programme suivant alors que le résultat devrait être 33 et je définis mes variables en Long :

Le but du programme est de réaliser la somme des entiers compris entre deux chiffres saisis par l'utilisateur, avec a pouvant être supérieur à b.

Voici mon programme :

Sub sommu()
Dim a As Integer, b As Integer, c As Integer, i As Integer, sommeu As Double
a = Application.InputBox("Saisir un entier", Type:=1)
b = Application.InputBox("Saisir un entier", Type:=1)
If a > b Then
c = a
a = b
b = c
End If
sommeu = 0
For i = a To b
sommeu = sommeu + i
Next i
MsgBox sommeu
End Sub

Je ne comprends pas à quelle étape je dépasse la capacité, et surtout pourquoi ? Les nombres tests que j'utilise sont a=10 et b=12

Merci à vous

bonjour, cette macro s'éxécute sans problèmes chez moi ...

Hello, le problème vient peut être de mon mac j’ai cru entendre que les macs avaient parfois des problèmes avec vba

Bonjour

Bonjour à tous

Pareil que BsAlv pour moi

Bye !

Rechercher des sujets similaires à "depassement capacite"