Formule avec nombre variable d'onglets

Bonsoir le forum,

J'ai un classeur Excel composé d'un nombre variable d'onglets. L'onglet "Colonne ECS(2)" est une copie de l'onglet "Colonne ECS (1)", créée à partir d'une macro (on peut créer autant d'onglets "Colonne ECS(x)" qu'on veut.

Je voudrais copier les valeurs de la cellule (C4) de chaque onglet dans les cellules B10, B11, B12, ... de l'onglet "Récapitulatif". Le problème est que si les onglets "Colonne ECS(x)" n'existent pas, j'ai une erreur avec #Ref!.

Je recherche donc une formule qui permettrait de copier automatiquement les valeurs de la cellule C4, de chaque onglet créé.

Quelqu'un pourrait-il m'aider ?

Merci d'avance.

Bonjour, voilà..

Sub cp()
  Dim f As Worksheet
  For Each f In Worksheets
    If f.Name Like "Colonne ECS" & "*" Then
      Feuil2.Cells(Rows.Count, 2).End(xlUp).Offset(1, 0) = f.[C4]
    End If
  Next
End Sub

Bonjour,

Regarde dans ton fichier ci-retourné.

Bonjour Machin et Raja,

Merci beaucoup pour votre aide.

Très bonne journée.