Extraction de données d'une base

Bonjour les experts !

Je souhaite, à partir de critères référentiels (période, comptes, localisation), extraire des informations d'une base de données. En fait cela doit fonctionner comme un filtre mais isolé dans une autre feuille.

Par exemple: Afficher tous les commerciaux qui se trouvent dans une ville A, qui commercialisent un produit B, entre janvier et février et le CA de chacun d'eux.

Merci d'avance

salut Mastou,

Pivot Table (ou TCD) me parairt etre la solution, non?

Bonjour,

@ Mastou,

Merci de joindre un fichier à ta demande.

Cdlt.

Bonjour,

@ Mastou,

Merci de joindre un fichier à ta demande.

Cdlt.

Voici un modèle. Merci Jean

12exemple.xlsx (10.61 Ko)

Un TCD (pivot table) remplit la fonction voulue.

La seule difficulté, c'est de tenir le curseur dates (il n'y a pas moyen de sélectionner de valeurs externes pour l'intervalle de dates dans le slicer)/. J'ai donc créée une petite macro qui fait ça toute seule.

Si tu tiens absolument a conserver ton format, essaie avec SOMME.SI.ENS(). La table pivot reste le plus rapide.

Salut

Yves

9exemple-2.xlsm (134.49 Ko)

Bonjour,

Une autre proposition vu ta version Excel qui semble être 2007.

Les données ont été mises sous forme de tableau et on utilise un tableau croisé dynamique pour obtenir les résultats.

Cdlt.

Public Sub Filter_Data()
Dim pt As PivotTable
Dim lStartDate As Date, lEndDate As Date, lDate As Date
Dim pi As PivotItem
Dim tbl

    With Worksheets("TCD")
        Set pt = .PivotTables(1)
        lStartDate = .[E1]
        lEndDate = .[E2]
    End With

    pt.ClearAllFilters
    pt.ManualUpdate = True
    pt.PivotFields("Date").EnableItemSelection = True

    For Each pi In pt.PivotFields("Date").PivotItems
        tbl = Split(pi.Value, "/")
        lDate = DateSerial(tbl(2), tbl(0), tbl(1))
        If lDate < lStartDate Or lDate > lEndDate Then
            pi.Visible = False
        End If
    Next

    pt.ManualUpdate = False

End Sub

bonjour

un essai à la tulipe

toutes les plages sont dynamiques ;pas de souci de rajout

16mastou.xlsx (12.76 Ko)

cordialement

Merci vraiment à tous pour autant de générosité.

Rechercher des sujets similaires à "extraction donnees base"