Comment vider un tableau Array ?

[VIC]

Bonjour à tous
Bonjour le Forum !

J'ai un tableau de type Array
Je donne des valeurs à chaque élément.
Je les utilise puis je veux toutes les supprimer pour donner de nouvelles valeurs. (et j'ai besoin qu'elle soit vide)

comment Faire ?

Je peuxs faire :
Dim MyArray(10)
For i = 0 to 9
MyArray(i) = Empty
Next

ça marche mais je me demande si il n'y a pas une solution plus directe et plus rapide du genre MyArray= Empty ou autre

Merci d'avance

Vic

 

[kiskool]

salut,

je crois que quand tu créés un tableau (array) il est vide par défaut.

Si tu veux le vider tu peux faire un :

redim MyArray(10)

ca la redimensionne en effacant son contenu.

Pour info tu peux le redimensionner sans effacer son contenu en ajoutant Preserve:

redim preserve MyArray (12592)

++
kiskool

 

[VIC]

Bonjour, et Merci Kiskool.

Lorsque j'essai d'utiliser Redim Myarray(10), j'ai un message d'erreur car mon tableau a déjà été dimensionné et on ne peut pas le faire plusieurs fois
L'aide Microsoft annonce :'Un tableau statique ne peut être dimensionné qu'une seule fois. [...] seuls les tableaux dynamiques peuvent être redimensionnés' ex Dim MyArray()

 

[VIC]

Ça y est ça marche !!

Il faut d'abord déclarer le tableau sans lui donné de taille : dim MyArray()
puis le dimensionner avec ReDim MyArray(10) par exemple
[suite du code]
et enfin à nouveau ReDim MyArray(10) pour effacer son contenu.

Merci KisKool

Message édité par: VIC, à: 04/08/2005 09:34

 

[Ti_]

en fait, il existe une instruction VBA qui permet de réinitialiser un tableau : il s'agit de Erase

Erase MonTableau

et tu as un tableau tout neuf, prêt à resservir.

 

[VIC]

Et ben voila !!

je me disais bien qu'il devait exister une instruction prévu pour cela.

Cela prouve au moins qu'il y a souvent plusieurs methode pour arriver à ses fins.

Merci Ti_

en prime voici la definition 'officielle' :
ERASE : Réinitialise les éléments de tableaux de taille fixe et libère l'espace de stockage réservé aux tableaux dynamiques.


On peut réinitialiser plusieurs tableau à la fois
ex: Erase MonTableau1, MonTableau2, MonTableau3