Selectionner une feuille d'un certain nom, mais pas la Xeme feuille

If TestAncienFichier <> "" Then _
   
    'On récupère les données de l'ancien classeur pour les feuilles nommé 0 à 53
    Dim Feuil As Integer, col As Integer, lig As Integer
   
Dim tabl(1)
Dim i As Long
tabl(0) = "Feuil1"
tabl(1) = "Feuil2"


For i = 0 To 1
Feuil = tabl(i)
        For col = 0 To 5 'Colonne I
            For lig = 0 To 83 'Ligne C92
                Workbooks(NomFichier).Worksheets(Feuil).Range("C9").Offset(lig, col).Value = Workbooks(NomAncienFichier).Worksheets(Feuil).Range("C9").Offset(lig, col).Value
            Next
        Next
    Next

Worksheets(CStr(Feuil))

Dim Feuil As Byte
For Feuil = 0 To NombreSemaine
  Workbooks(NomFichier).Worksheets(CStr(Feuil)).[C9:I92] = Workbooks(NomAncienFichier).Worksheets(CStr(Feuil)).[C9:I92].Value
Next