[VBA Excel] pb depassement de capacité

j'ai un tableau à 2 dimensions (1911 lignes et 2261 colonnes), et j'écris les valeurs du tableau dans un fichier texte.

voici les lignes de code pour écrire dans le fichier :

Code:

---

1 2 3 4 5 6

For l = 1 To nbl For c = 1 To nbc 'toto = x_0 + (c - 1) * 50 Print #num_out, CStr(y_0 + (l - 1) * 50) & dlm_out & CStr(x_0 + (c - 1) * 50) & dlm_out & T_MNT(l, c) Next c Next l

---

nbl et nbc contiennent les valeurs 1911 et 2261, déclarées en type integer.
x_0=860000 et y_0=1781000 (constantes déclarées en type long)

l'instruction print plante quand l=1 et c=657 au niveau de CStr(x_0 + (c - 1) * 50), avec le message d'erreur 'dépassement de capacité'.

à ce niveau, x_0+(c-1)*50 vaut 892800, ce qui ne correspond à aucune valeur limite d'un type de donnée.

quelq'un a-t-il une idée du problème ?

teste ceci

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub testegrandeur() On Error GoTo error1 Dim a As Byte a = 255 + 255 - 255 MsgBox ("ca passe avec des nombres") a = a + a - a Exit Sub error1: MsgBox ("ca passe pas avec des variables ") End Sub

---

moralité vb utilise une valeur tampon à laquelle il donne une taille qu'il juge convenable pour 255 il ne se trompe pas mais pour a (byte) qui vaut pourtant
255 quand le tampon vaut 510 il pleure

Si le dépassement de capacité ne concerne pas les nombres, alors le pb vient "d'ailleurs". Essaie d'ajouter un retour chariot en fin de ligne et dis-nous

Code:

---

Print #num_out, CStr(y_0 + (l - 1) * 50) & dlm_out & CStr(x_0 + (c - 1) * 50) & dlm_out & T_MNT(l, c) & chr(13)

---

A tout hasard