Comment tester si un tableau est vide???

[fodjio]

bonjour tout le monde,

En ce moment j'ai un problème :

J'ai un tableau que je déclare

**********
Dim Tableau()
**********
Ce tableau reçoit des valeurs dans une boucle de la maniène suivant
(c'est un tableau dynamique)

**************************
redim preserve Tableau(NbItems)
Tableau(NbItem)=Valeur
**************************

Mais il arrive que la condition pour "incrémenter" mon tableau ne s'active jamais, laissant mon tableau "vide"

Donc, j'aimerai tester si celui-ci est vide, et c'est ça que je n'arrive pas à faire

*******************
if Tableau est vide then
ect
******************

PS: IsEmpty, IsNull et IsNull ne marche pas


Merci beaucoup de votre aide...

 

[Wilfried]

Salut,

Ton tableau est déclarer de quelle type : string,integer,variant,

essaye :

if tableau(NbItems)="" then

end if

Cela peut peut-être marché.

Ce n'est qu'une extrapolation car je ne connais pas le fonctionnement des tableau croisé dynamique, mais cela marche pour un tableau du style

dim m_tab(1 to 8) as string
dim m_nb_val_nul as integer

m_nb_val_nul=0
for i=1 to 8
if m_tab(i)="" then
m_nb_val_nul=m_nb_val_nul+1
end if
next i
if m_nb_val_nul=8 then
msgbox("tableau vide")
end if

A+ Wilfried ;o)

 

[fodjio]

Salut Wilfried et merci de t'être pencher sur mon problème,
je vais utiliser ton astuce de la variable "mouchard" dans la boucle.
(pourquoi j'y est pas pensé avant?)


Merci

 

[Minick]

Salut,

Si j'ai bien compri ton probleme en utilisant la fonction UBound(Tableau)
tu pourras connaitre le plus grand indice de ton tableau donc sa taille.

@+ Minick

 

[fodjio]

Salut Minick,

bien essayé, mais cette fonction "bloque" lorsque le tableau est "vide"
Je met des parenthèses parce que dans la fenêtre qui indique le type des variables locales il n'y est même pas inscrit 'Empty', y'a rien! (j'ai découvert le type 'néant' :0# )

 

[Minick]

Re,

Exact j'avais oublié cela donc plus grand interet
sinon en mettant un controle d'erreur mais cela alourdiré ton code

@+ Minick

 

[fodjio]

Y'a pas d'mal, merci quand même!