I am programmatically generating a pivot chart. I am trying to turn off the subtotals, but attempting to set the subtotals generates an error. I have an Array of strings containing field names for the pivot chart and within the script debugger I can see that the oPivotField has a value that is a PivotField type. Even in the immediate windows accessing the subtotals property generates an error. Anyone run into this?

For Each sFieldName In aFieldList
iCounter = iCounter + 1

Set oPivotField = oPivotTable.PivotFields(sFieldName)
If Not (oPivotField Is Nothing) Then
oPivotField.Orientation = xlDataField
oPivotField.Position = iCounter
oPivotField.Subtotals(1) = False <*** Generates Error
End If
Next

Thanks,

Sam

--
_______________________________
Sam Santiago

http://www.SoftiTechture.com
_______________________________