Discussion :

[flamel]

Bonjour,

J'ai un probblème avec un Tableau:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

intValeur = intTableau(NumServ, NumFonc, NumDanger, 1)

J'ai l'impression qu'on ne peut pas mettre des variables comme indice dans un tableau, pour la lecture, ou bien j'ai un problème de déclaration.
Voici les déclarations faite dans le même module :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    Dim iLigneLire, iLigneResultat, iColDanger, NumServ, NumFonc, NumDanger, DonValeur As Integer
    Dim intTableau(50, 50, 80, 5) As Integer
    Dim intValeur As Integer

Merci si vous pouvez m'aider.

flamel

[pgz]

Bonjour.

Je crois que le pb pourrait provenir de la déclaration des vraiables

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim iLigneLire, iLigneResultat, iColDanger, NumServ, NumFonc, NumDanger, DonValeur  As Integer

Seul DonValeur est de type entier. Les autres sont variants. Essaie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim iLigneLire as Integer, iLigneResultat as integer, ...

Cordialement,

PGZ

[flamel]

Bonjour,

Je crois avoir trouver une raison.
Le tableau n'est pas complet, et il y a donc des valeurs qui n'existent pas.

J'ai un message: ' L'indice n'appartient pas à la sélection '

J'ai essayé de contourner avec 'on error goto' , mais ça n'empêche pas de bloquer.
Y a-t-il un autre moyen ?

Merci.

flamel

[pgz]

Re,

J'ai un message: ' L'indice n'appartient pas à la sélection '

Cela veut dire que tu utilises des valeurs d'indices trop grandes. Par exemple avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Dim intTableau(50, 50, 80, 5) As Integer

l'indice de la dimension 1 va de 0 à 49. Si tu demandes intTableau(50,1,1,1), tu as ce message d'erreur.

PGZ

[flamel]

Merci PGZ

Ce n'est pas le cas.
Il doit y avoir une bêtise que je n'arrive pas à détecter.

Cordialement

flamel

[Qwazerty]

Salut
Pour ma part, je me demande ce que tu souhaites faire exactement, car un tableau à 4 dimensions ... c'est très lourd a gérer, utilises tu vraiment autant de cases?
Déclaré comme tu l'a fait cela revient a dire
j'ai 50 cases,
contenant chacune 50 cases,
qui elles même contiennent 80 cases
composé de 5 cases

Ça fait un paquet de cases
5*80*50*50 = 1 millions de cases si je ne dis pas de bêtise.
Dis nous en un peu plus sur ton besoin, quel structure souhaites tu stocker dans ton tableau?

Si vraiment ton besoin est tel, donne nous les valeurs prise par tes différentes variables (NumServ, NumDanger, Num...)

A++
Qwaz

[pgz]

Bonsoir.

Pour compléter l'intervention de Qwaz, je te suggère quand tu rencontres l'erreur d'ouvrir le debug et de lire les valeurs de tes variables utilisées en indices. Suivant le message d'erreur, c'est clair tu en as au moins une en dehors des clous.

Cordialement,

PGZ