>By default a pivottable will create subtotals for all the groupings. In one of my reports I want to turn off subtotals. I recorded a macro in Excel and it returned the following code:
>
>

>ActiveSheet.PivotTables("PivotTable").PivotFields("sub_cntry").Subtotals = _
>  Array(False, False, False, False, False, False, False, False, False, False, False, False)
>

>
>I tried the following two workarounds but the first will not compile and the second returns an error:
>
>

>
>DIMENSION laSubTotals[12]
>laSubTotals = .F.
>WITH oExcel.PivotTables("PivotTable")
>   .PivotFields("sub_cntry").SubTotals = @laSubTotals  && won't compile
>
>   .PivotFields("sub_cntry").SubTotals( @laSubTotals) && OLE error
>ENDWITH
>

>
>Anyone got a solution?

Hi Tom,
Try this :

.PivotFields("sub_cntry").SubTotals(1) = .t.
.PivotFields("sub_cntry").SubTotals(1) = .f.

Cetin