extraire des données d'un tableau croisé dynamique

P

philmaure

XLDnaute Impliqué

• 13 Avril 2011

• #2

Re : extraire des données d'un tableau croisé dynamique

je viens de trouver une partie du problème il me faut rentrer dans le tableau du haut les cellules du TCD
je remet le classeur mis à jour
Cdlt

 

Pièces jointes

• Classeur1.xls

  243.5 KB · Affichages: 184
• Classeur1.xls

  243.5 KB · Affichages: 190
• Classeur1.xls

  243.5 KB · Affichages: 184

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 13 Avril 2011

• #3

Re : extraire des données d'un tableau croisé dynamique

Bonjour à tous,

Peux-tu essayer dans le code de la feuille :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$E$13" Then
     ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("date"). _
        CurrentPage = Range("E13").Text
        End If
    End Sub

A+ à tous

 

Vote positif 0 Vote négatif

P

philmaure

XLDnaute Impliqué

• 13 Avril 2011

• #4

Re : extraire des données d'un tableau croisé dynamique

Bonsoir et un grand merci ca fontionne comme je le souhaitais.
Cordialement
Philippe

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 13 Avril 2011

• #5

Re : extraire des données d'un tableau croisé dynamique

Bonjour à tous,

Tu peux supprimer les noms définis a et b ainsi que la Sub ab()

A+ à tous

 

Vote positif 0 Vote négatif

P

philmaure

XLDnaute Impliqué

• 13 Avril 2011

• #6

Re : extraire des données d'un tableau croisé dynamique

ok encore merci
@+

 

Vote positif 0 Vote négatif