>
> ActiveSheet.PivotTables("PivotTable").PivotFields("title").Subtotals = Array( _
> False, False, False, False, False, False, False, False, False, False, False, False)
>
> With ActiveSheet.PivotTables("PivotTable").PivotFields("line_numbr")
> .LayoutBlankLine = False
> .LayoutForm = xlTabular
> End With
>
>
>i tried
>oPivotTable.PivotFields("line_numbr").subtotals=.f. && OLE ERROR parameter incorrect
>
>oPivotTable.PivotFields("line_numbr").layoutform=xlTabular && it fires a error message xlTabular not found ,what is the value of xlTabular
>
>TIA
I looked up xlTabular in Excel's object browser and its value is 0.
You just have to define it that way, i.e. #define xlTabular 0
HTH,
Winn Pauley