Problème avec un constante pour tableau

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Problème avec un constante pour tableau

pulsar07

Je stocke dans ma variable DLV1 le nombre de ligne de ma colonne excel passée en paramètre de la façon suivante:

Code :

Dim DLV1 As Integer
DLV1 = Workbooks(ClasseurATraiter).Sheets(FeuilleATraiter).Columns(Lettre2NumCol(ColonneATraiter)).Find("", , , , xlByRows, xlNext).Row - 1

Cela fonctionne très bien.
Je voudrais ensuite créer un tableau ayant pour taille le nombre de ligne de ma colonne Excel.
J'ai donc pensé à definir mon tableau comme ceci:

Code :

Dim tableau(DLV1) As String

Seulement cela ne fonctionne pas. On me dit que DLV1 doit etre déclaré en Constante.

Si je déclare DLV1 en constante il me dit que Row doit être en constante également.

Message édité par pulsar07 le 07-12-2007 à 13:52:29

Publicité

tegu

La fonction Dim appliquée à une varibale de type tableau n'accepte qu'un indice de type constante, soit

Dim tab(15) As Integer

On ne peut pas remplacer 15 par une variable.
Mais il y a une astuce. Car on peut déclarer un tableau comme suit

Dim tab() As Integer

sans indiquer d'indice, puis dans la suite du code utiliser la déclaration ReDim pour fixer l'indice.
On a alors

Dim tab() As Integer
Dim var As Integer
var = 15
Redim tab(var) As Integer

Voir l'aide en ligne sur ReDim pour les subtilités (ReDim Preserve...)

pulsar07

Niquel, Merci tegu.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Problème avec un constante pour tableau

Sujets relatifs
[Smarty] Acceder à un tableau par index $tableau[$x][$y]	Cumul valeur dans un tableau
probleme exo XML	[resolu]passage de php4 à php5.... petit problème
[C] Tableau à deux dimensions	Problème GtkImage sour MSVStudio 2008 Beta et Vista
problème programme Tableau	Probleme Free et scripts de news PHP
problème de Visual Studio
Plus de sujets relatifs à : Problème avec un constante pour tableau

Page générée en 0.031 secondes