Hi.

I have a programmed pivot table, and I want to be able to change the color
on the subtotal row to gray.

It happens to be the 6th pivot item (I reference it more dynamically in the
code)...

I have:

'************
dim pvT as PivotTable
dim pvF as PivotField

set pvT = ActiveSheet.PivotTables(1)
set pvF = pvT.PivotFields(6)
'*************

If I wanted to change the displayed wording on that subtotal line from the
default, I could put in something like:

pvF.SubtotalName = "Howard the Duck"

But, how can I change the background formatting?

if I knew which cell it is ahead of time, it could be like this:

Selection.Interior.ColorIndex = 15

Thanks.
Mark