Boucle incrémentant les colonnes

[pafi]

Bonjour à tous,
(je travaille sous Access avec connection a Excel)
je souhaiterai réaliser une boucle permettant de passer toutes les colonnes excel en revue, afin de faire des sommes de valeurs dans chaque colonnes...
Pour sommer, je dois donc déclarer des range...
Seulement je ne voudrais pas m'amuser a écrire

Set plage1 = xlApp.Sheets(maFeuille).Range("A1:A5")
somme1=xlApp.WorksheetFunction.Sum(plage1)
Set plage1 = xlApp.Sheets(maFeuille).Range("B1:B5")
somme2=xlApp.WorksheetFunction.Sum(plage1)
Set plage1 = xlApp.Sheets(maFeuille).Range("C1:C5")
somme3=xlApp.WorksheetFunction.Sum(plage1)
                                .
                                .
                                .

Je voudrais donc déclarer une seule plage et effectuer une boucle qui va m'incrémenter mes lettres, et arriver a Z, va automatiquement mettre AA etc...est-ce possible, existe-t-il une solution a ca ?

Merci d'avance

 

[pafi]

Re : Boucle incrémentant les colonnes

marche nikél, merci bcp