Création tableeau reprennant des données de plusieurs feuilles différentes

Bonjour,

Je souhaiterai créer un graphique à base de données contenues dans plusieurs feuilles.

Chaque feuille contient plusieurs dizaines de lignes, sur base desquelles j'effectue une moyenne,

un exemple sera plus simple :

Données page 1:

10/03/2018 19:36 1940

11/03/2018 19:35 1940

12/03/2018 12:36 1989

12/03/2018 19:35 2019

13/03/2018 12:35 2019

13/03/2018 19:35 2019

14/03/2018 12:35 2020

14/03/2018 19:35 2023

15/03/2018 12:35 2027

1/04/2018 19:35 2039

2/04/2018 12:36 2039

13/04/2018 19:35 1957

14/04/2018 19:36 1957

15/04/2018 19:35 1957

Moyenne page 1:

mars-18 2024

avr-18 1989

Je souhaiterai pouvoir exporter les données de chacune de ses pages (environ 20) et les regrouper dans un graphique afin de montrer l'évolution mois après mois, pour chaque élément.

C'est assez compliqué à expliquer sans voir le tableau mais certaines données peuvent avoir un caractère confidentiel donc je préfère éviter de publier la source.

J'espère avoir fourni assez d'informations pour vous exposer mes besoins.

Bonjour,

voici une macro de compilation

Option Explicit

Sub consolide_onglets()
  Dim s As Byte
  Worksheets("Compilation").[A1].CurrentRegion.Offset(1, 0).Clear
  For s = 2 To Sheets.Count
    With Sheets(s)
      If .Name <> "Compilation" Then ' inutile si s commence à 2 et que le premier onglet est Compilation
        Cells(rows.count,1).End(xlUp).Offset(1, 0).Select
        .Range(.[A2], .Cells(rows.count,1).End(xlUp).End(xlToRight)).Copy
        ActiveSheet.Paste
      End If
    End With
  Next s
End Sub