Je débute avec ces tables donc j'ai surement disjoncté quelque part
Disons trois colonnes a,b,c
Dans A une date
Dans B un numéro de facture
Dans C un montant
Pour faire des test j'avais mis en B des numéro comme 120, 122, 124
J'ai fait ma table pivot et je suis arrivé à ce que je voulais
Alors j'ai remplacé mes numéros par des numéros de factures réelles 204205,
204207, 204212, 204218
Et maintenant quand je fait un tris sur le numéros de facture dans la table
pivot (après un refresh) je vois tous les numéros les nouveux et les anciens
Comment peut-on les suprimés?
Puisque ces numéros n'existent nulle part ailleurs que dans la mémoire de la
table pivot
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour RT,
Voici un message sur le sujet publié ici par Daniel Maher,
'--------------------- Pour une version plus récente et AMA, plus sécure : On peut adapter en suspendant les MAJ calculs/affichage écran.
' Published by Debra Dalgleish 21 Juin 2003 ' '===================== Sub DeleteOldItemsWB() 'gets rid of unused items in PivotTable ' based on MSKB (202232) Dim WS As Worksheet Dim pt As PivotTable Dim pf As PivotField Dim pi As PivotItem Dim i As Integer
On Error Resume Next For Each WS In ActiveWorkbook.Worksheets For Each pt In WS.PivotTables pt.RefreshTable For Each pf In pt.PivotFields For Each pi In pf.PivotItems If pi.RecordCount = 0 And _ Not pi.IsCalculated Then pi.Delete End If Next Next Next Next End Sub '=======================
Salutations!
"RT" a écrit dans le message de news:v4HXc.227223$ Bonjour à tous
J'ai un truc bizarre avec une table pivot
Je débute avec ces tables donc j'ai surement disjoncté quelque part
Disons trois colonnes a,b,c Dans A une date Dans B un numéro de facture Dans C un montant
Pour faire des test j'avais mis en B des numéro comme 120, 122, 124
J'ai fait ma table pivot et je suis arrivé à ce que je voulais
Alors j'ai remplacé mes numéros par des numéros de factures réelles 204205, 204207, 204212, 204218
Et maintenant quand je fait un tris sur le numéros de facture dans la table pivot (après un refresh) je vois tous les numéros les nouveux et les anciens
Comment peut-on les suprimés?
Puisque ces numéros n'existent nulle part ailleurs que dans la mémoire de la table pivot
Si quelqu'un a une idée
Merci
Rex
Bonjour RT,
Voici un message sur le sujet publié ici par Daniel Maher,
'---------------------
Pour une version plus récente et AMA, plus sécure :
On peut adapter en suspendant les MAJ calculs/affichage écran.
' Published by Debra Dalgleish 21 Juin 2003
'
'===================== Sub DeleteOldItemsWB()
'gets rid of unused items in PivotTable
' based on MSKB (202232)
Dim WS As Worksheet
Dim pt As PivotTable
Dim pf As PivotField
Dim pi As PivotItem
Dim i As Integer
On Error Resume Next
For Each WS In ActiveWorkbook.Worksheets
For Each pt In WS.PivotTables
pt.RefreshTable
For Each pf In pt.PivotFields
For Each pi In pf.PivotItems
If pi.RecordCount = 0 And _
Not pi.IsCalculated Then
pi.Delete
End If
Next
Next
Next
Next
End Sub
'=======================
Salutations!
"RT" <rthsopmapmson@softscreen.be> a écrit dans le message de news:v4HXc.227223$Iu4.11103352@phobos.telenet-ops.be...
Bonjour à tous
J'ai un truc bizarre avec une table pivot
Je débute avec ces tables donc j'ai surement disjoncté quelque part
Disons trois colonnes a,b,c
Dans A une date
Dans B un numéro de facture
Dans C un montant
Pour faire des test j'avais mis en B des numéro comme 120, 122, 124
J'ai fait ma table pivot et je suis arrivé à ce que je voulais
Alors j'ai remplacé mes numéros par des numéros de factures réelles 204205,
204207, 204212, 204218
Et maintenant quand je fait un tris sur le numéros de facture dans la table
pivot (après un refresh) je vois tous les numéros les nouveux et les anciens
Comment peut-on les suprimés?
Puisque ces numéros n'existent nulle part ailleurs que dans la mémoire de la
table pivot
Voici un message sur le sujet publié ici par Daniel Maher,
'--------------------- Pour une version plus récente et AMA, plus sécure : On peut adapter en suspendant les MAJ calculs/affichage écran.
' Published by Debra Dalgleish 21 Juin 2003 ' '===================== Sub DeleteOldItemsWB() 'gets rid of unused items in PivotTable ' based on MSKB (202232) Dim WS As Worksheet Dim pt As PivotTable Dim pf As PivotField Dim pi As PivotItem Dim i As Integer
On Error Resume Next For Each WS In ActiveWorkbook.Worksheets For Each pt In WS.PivotTables pt.RefreshTable For Each pf In pt.PivotFields For Each pi In pf.PivotItems If pi.RecordCount = 0 And _ Not pi.IsCalculated Then pi.Delete End If Next Next Next Next End Sub '=======================
Salutations!
"RT" a écrit dans le message de news:v4HXc.227223$ Bonjour à tous
J'ai un truc bizarre avec une table pivot
Je débute avec ces tables donc j'ai surement disjoncté quelque part
Disons trois colonnes a,b,c Dans A une date Dans B un numéro de facture Dans C un montant
Pour faire des test j'avais mis en B des numéro comme 120, 122, 124
J'ai fait ma table pivot et je suis arrivé à ce que je voulais
Alors j'ai remplacé mes numéros par des numéros de factures réelles 204205, 204207, 204212, 204218
Et maintenant quand je fait un tris sur le numéros de facture dans la table pivot (après un refresh) je vois tous les numéros les nouveux et les anciens
Comment peut-on les suprimés?
Puisque ces numéros n'existent nulle part ailleurs que dans la mémoire de la table pivot
