Graphique et filtre

Résolu
Lumière -  
 Lumière -
Hello à tous,

Comment peut-on n'ettoyer le filtre du tableau croisée dynamique. Il me remet à jour les donnees lorsque je mets "actualiser tout" mais il me laisse les anciens éléments mélangés avec les nouveaux sur le filtre? Quelqu'un peut-il m'éclairer?

Mon deuxième problème c'est que je souhaiterais modifier l'ordre sur un graphique de l'axe vertical et je n'y arrive pas ?

Merci à tous.

3 réponses

  1.
    Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    C'est étrange, est-il possible de mettre votre fichier sur https://www.cjoint.com/ et poster le lien?
    0
    1. Lumière
       
      Malheureusement pas, ce fichier contient des données confidentielles, mais si vous avez la patience d'attendre jusqu'à demain soir je ferai un fichier similaire. :-)

      En tout cas merci d'avoir répondu à mon HELP! :-) Et je l'espère à demain
      0
  2. cousinhub29 Messages postés 1112 Date d'inscription   Statut Membre Dernière intervention   383
     
    Bonjour,

    Pour ta première question, il faut passer par un code VBA

    Selon la version Excel :

    Version 2002 ou ultérieure : 

    Sub supprime_anciens_items()
'Excel 2002 et ultérieurs
Dim pvt As PivotTable
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets
  For Each pvt In sh.PivotTables
    pvt.PivotCache.MissingItemsLimit = xlMissingItemsNone
    pvt.PivotCache.Refresh
  Next pvt
Next sh
End Sub


    Les versions antérieures : 

    Sub DeleteOldItemsWB()
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


    Bonne nuit
    0
  3. Lumière
     
    Superbe ca marche! :-) Je suis vraiment contente! Merci infiniment cousinhub 29.

    et merci également à Pingou :-)
    0