Petite question rapport au TCD (=Pivot Table) :
Dans une macro je génère automatiquement un TCD qui contient une dizaine de lignes.
Par défaut, Excel m'affiche un sous-total pour chacune des lignes... Grrrr
J'ai essayé de les retirer un par un pour chacune des lignes :
Sub test()
Dim p As PivotField
For Each p In ActiveSheet.PivotTables(1).PivotFields
If p.Orientation = 1 Then p.Subtotals = Array(False, False, False, False, _
False, False, False, False, False, False, False, False)
Next p
End Sub