Dépassement de capacité
Signaler
cs_Schum11
aouiti2001
- Messages postés
- 5
- Date d'inscription
- lundi 2 décembre 2002
- Statut
- Membre
- Dernière intervention
- 4 décembre 2002
aouiti2001
- Messages postés
- 3
- Date d'inscription
- vendredi 27 décembre 2002
- Statut
- Membre
- Dernière intervention
- 20 novembre 2008
A voir également:
- Cint vba
- Vba cint - Meilleures réponses
- Vba dépassement de capacité - Meilleures réponses
- L'opération arithmétique a provoqué un dépassement de capacité ✓ - Forum - VB.NET
- Erreur '6' Dépassement de capacité ✓ - Forum - Visual Basic 6
- Problème de dépassement de capacité WorksheetFunction.CountA ✓ - Forum - Visual Basic 6
- Erreur d'exécution: dépassement de capacité. ✓ - Forum - Visual Basic 6
- [Déplacé .Net --> VBA] Erreur de type Dépassement de capacité ✓ - Forum - Visual Basic 6
5 réponses
cs_rene38
- Messages postés
- 1858
- Date d'inscription
- samedi 29 juin 2002
- Statut
- Membre
- Dernière intervention
- 17 octobre 2013
Remplace CInt par CLng
cs_DARKSIDIOUS
- Messages postés
- 15814
- Date d'inscription
- jeudi 8 août 2002
- Statut
- Modérateur
- Dernière intervention
- 4 mars 2013
De plus, fais ceci :
hauteur = Val(300) * CLng(i) + 800, ce problème m'était déjà arrivé !!!
DARK SIDIOUS
hauteur = Val(300) * CLng(i) + 800, ce problème m'était déjà arrivé !!!
DARK SIDIOUS
VicoLaChips2
- Messages postés
- 436
- Date d'inscription
- dimanche 20 janvier 2002
- Statut
- Membre
- Dernière intervention
- 2 février 2010
Bonjour -:)
Dans le cas ou c'est un For Next :
Dim hauteur As Long
For i = 1 To 200
hauteur = 300 * i + 800
Debug.Print hauteur
Next
'Marche très bien...
En revanche pour le reste c'est foireux !!
Comme quoi VB c'est bien pour manipuler des chaines de caractères mais pas des chiffres !!
@+, VIC
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
Dans le cas ou c'est un For Next :
Dim hauteur As Long
For i = 1 To 200
hauteur = 300 * i + 800
Debug.Print hauteur
Next
'Marche très bien...
En revanche pour le reste c'est foireux !!
Comme quoi VB c'est bien pour manipuler des chaines de caractères mais pas des chiffres !!
@+, VIC
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
VicoLaChips2
- Messages postés
- 436
- Date d'inscription
- dimanche 20 janvier 2002
- Statut
- Membre
- Dernière intervention
- 2 février 2010
Encore moi...
une variable de type integer est comprise entre
-32 768 et 32 767
Comme le résultat final est 60800 c'est > à la capacité de i si i est un integer.
Ce qui veut dire aussi que i qui est supposer être entre 1 et 200 prend en fait la valeur de Hauteur...
Donc si on écrit :
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
ça marche aussi !!
@+; VIC
une variable de type integer est comprise entre
-32 768 et 32 767
Comme le résultat final est 60800 c'est > à la capacité de i si i est un integer.
Ce qui veut dire aussi que i qui est supposer être entre 1 et 200 prend en fait la valeur de Hauteur...
Donc si on écrit :
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
ça marche aussi !!
@+; VIC