Comme je ne suis pas sûr de bien comprendre, il se peut que je réponde à côté de la plaque...
Je suppose que tu as une feuille Récap, et d'autres feuilles détail en nombre variable. Et tu veux avoir dans un tableau, dynamiquement, la liste des feuilles existantes. Si c'est bien ça, tu peux utiliser une petite routine de ce genre : Dim NbrF As Integer
Dim TabF(50) As String
Dim Feuille As Worksheet
NbrF = 0
For Each Feuille In Worksheets
If Feuille.Name <> "Récap" Then
NbrF = NbrF + 1
TabF(NbrF) = Feuille.Name
End If
NextJ'utilise, en début de module, Option Base 1, qui permet d'indicer le tableau en partant de la valeur 1 et non pas zéro.
Le tableau des noms de feuilles est dimensionné à 50. On le remplit avec le nom des feuilles existantes autres que Récap (nom à adapter), et NbrF contient le nombre de feuilles stockées en table.
Pour ta question idType(i) = Range("A" & i).Value, je ne comprends pas bien le PB. Ça te donne la valeur de la cellule Ai. mais que veux-tu obtenir exactement ?


