ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
"[DATE].[Annee - Semaine - Date].[Annee ISO]").VisibleItemsList = Array( _
"[DATE].[Annee - Semaine - Date].[Annee ISO].&[2011]")
ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
"[DATE].[Annee - Semaine - Date].[Semaine Annee]").VisibleItemsList = Array("")
ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
"[DATE].[Annee - Semaine - Date].[Date]").VisibleItemsList = Array("")