Comment rendre "FeuilN" générique ?

Bonjour,

Je souhaiterais automatiser une séquence du type :

valeur(1) = Feuil1.Cells(1, 1)

valeur(2) = Feuil2.Cells(1, 1)

valeur(N)=FeuilN.Cells(1, 1)

Je pense faire cela avec une boucle For .... mais comment rendre "variable" les Feuilles ??

Merci de votre aide !

Coirdialement.

Bonjour et bienvenue,

Range les valeurs en colonne "A" de la 1ère feuille

Sub test()
Dim i As Byte
    For i = 2 To Worksheets.Count
       Sheets(1).Cells(i, 1) = Sheets(i).Cells(1, 1)
    Next
End Sub

Amicalement

Claude

Merci beaucoup !

C'est vraiment formidable internet

A bientôt.

Thierry