VBA - Cmt utiliser tableaux

Résolu
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -  
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour le forum,

Comment déclare t on une variable tableau ?
Comment affecter une valeur à ce tableau et comment le parcourir ??

Merci par avance !


1 réponse

eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonsoir,

dim a(7) as double (ou long ou string ou ...)

ou bien si la taille n'est pas fixe :
dim a() as long, d as long
d=7
redim a(d)

Si tu change la taille et que tu as des valeurs que tu veux conserver alors :
redim preserve a(d+1)

Ensuite tu y accèdes par l'indice
for i = 1 to 7
a(i)=i
next i
msgbox(a(3))

eric
1
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
Salut Eriic, Tehani_t

juste une petite remarque

les variable tableaux commence à l'indice 0

donc si 7 éléments d=6
redim a(6)

pour parcourir

for i = 0 to 6
ou
for i=0 to Ubound(a)

Si on veut commencer à 1 au lieu de 0 (souvent + pratique)
avant les macros en 1° ligne
Option base 1
ou dans les déclarations
d=7
redim a(1 to d)
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
Re,

Pour tout savoir sur les variables-tableaux
https://silkyroad.developpez.com/vba/tableaux/

Bonne lecture (studieuse)
:-)
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
J'ai l'impression que Monsieur Tehani n'est pas très intéressé par l'aide qui lui est apportée ou ne saurait il pas dire Merci ?
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Salut michel,

En général si, mais c'est madame je crois... ;-)
A+
eric
0
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   21
 
Merci eriiic !!!!! Et désolée si je ne passe pas mon temps sur le net a attendre que quelqu'un réponde mais j'ai des dépannages et des réunions aussi !
0