Déclarer un tableau de constantes ? (string et date)

[Charly88]

Bonsoir,
J'ai fait quelques recherches sur le net guère concluantes sur le sujet. J'ai 2 tableaux que j'aimerais déclarer en constantes en espérant avoir un gain de performances par rapport à leur déclarations actuelles en variable publique au démarrage du prog.

L'un a une dimension :
Public TabNomMois(1 To NbMaxMois) As String 'avec NbMaxMois lui-même une constante

Public Sub DefTabNomMois()

TabNomMois(1) = "01.10"
TabNomMois(2) = "02.10"
TabNomMois(3) = "03.10"
TabNomMois(4) = "04.10"
TabNomMois(5) = "05.10"
...

L'autre, 2 et contient des dates :
Public TabBornesMois(2, NbMaxMois) As Date 'avec NbMaxMois lui-même une constante
Public Sub DefTabBornesMoiss()
TabBornesMois(1, 1) = "01/01/2010"
TabBornesMois(1, 2) = "01/02/2010"
TabBornesMois(1, 3) = "01/03/2010"
TabBornesMois(1, 4) = "01/04/2010"


Quelqu'un s'est-il déjà frotté à ce genre de choses ? 🙂

 

[Softmama]

Re : Déclarer un tableau de constantes ? (string et date)

Pour le tableau à 1 seule dimension :

Const TabNomMois as string = "01.10|02.10|03.10|04.10|05.10"

dans la macro, tu l'appelles ainsi :

Msgbox Split(TabNomMois, "|")(x)

où x est l'index de ton tableau.