Creation de variables :)

Bonjour a tous
jai plusieur fichier de BDD et je cherche a recuperer le numero des colonnes pour pouvoir accelerer apres mon travail

pour linstant je fais une boucle

Code:

---

1 2 3 4 5 6

For Y = 1 To UBound(TBLOHISTO, 2) Step 1 If £TOTAL = "" Then If TBLOHISTO(1, Y) = "TOTAL" Then £TOTAL = Y ' ... ' etc...   next

---

le principal probleme cest que cest long car 60variable a chequer fois 60 boucle donc 3600 verif pour creer la liste,
il y a til un moyen bcp plus simple?
sachant que la variable c'est le nom de la colonne avec un £ devant et que Y cest son numero de colonne>
et si possible avec la creation de la variable.

MERCI par avance