Import tableau filtré d'un autre classeur

Bonjour à vous,

J'ai besoin d'extraire un tableau filtré (sur la date, colonne C) d'un classeur fermé (Pointages BDD) contenant des horaires de travail effectués.

J'ai trouvé ce bout de code qui fonctionne bien pour importer la totalité de la feuille mais j'aimerais n'importer qu'une période d'un mois.

Dim Chemin As String, Fichier As String
Chemin = "C:\Users\ADMIN\Desktop\TAF\"
Fichier = "Pointages bdd.xlsm"
ThisWorkbook.Names.Add "plage", _
RefersTo:="='" & Chemin & "[" & Fichier & "]DB'!$B$2:$AE$9999"
    With Sheets("DB")
    .[B2:AE9999] = "=plage"
    .[B2:AE9999].Copy
    Sheets("DB").Range("B2").PasteSpecial xlPasteValues
    End With

Est-il possible de filtrer le tableau source du classeur (fermé) et importer le résultat ensuite ?

D'autre part, j'ai mis 9999 lignes, comment adapter au nombre réel de lignes ?

Merci d'avance pour votre aide

Bonjour

TU es sous Office 2016, peu d'intérêt à passer par du code VBA à mon sens, utilises query, tu obtiendras directement tes données filtrées comme tu le souhaites.

Query est accessible depuis l'onglet Données, dans Excel.

Cordia5

Merci pour ta réponse, je vais regarder si ça me convient