OliverForDan
XLDnaute Nouveau
toutes mes excuses à tous : Bonjour,
comment sélectionner toutes les valeurs du croisé dynamique sans les reprendre une à une comme ci-dessous
With ActiveSheet.PivotTables("BL1").PivotFields("Coulée")
.PivotItems("1806330").Visible = True
.PivotItems("1806340").Visible = True
.PivotItems("1806350").Visible = True
.PivotItems("1806360").Visible = True
End With
=====>>>et transformer en quelque chose qui ressemble à la commande ci-dessous..
With ActiveSheet.PivotTables("BL1").PivotFields("Coulée")
.PivotItems(???tous???).Visible = True
End With
comment sélectionner toutes les valeurs du croisé dynamique sans les reprendre une à une comme ci-dessous
With ActiveSheet.PivotTables("BL1").PivotFields("Coulée")
.PivotItems("1806330").Visible = True
.PivotItems("1806340").Visible = True
.PivotItems("1806350").Visible = True
.PivotItems("1806360").Visible = True
End With
=====>>>et transformer en quelque chose qui ressemble à la commande ci-dessous..
With ActiveSheet.PivotTables("BL1").PivotFields("Coulée")
.PivotItems(???tous???).Visible = True
End With
Dernière édition: