Pivot Table Format data area

[BlindPete]

Hello All,

I have macro that creates a pivot table. It works fine, but the data area (the grid between columns and row headers) needs formating. I can do it manually, but I don't want to. I've tried a variety of methods for formating but no luck.

Can any one help me out?

' NO JOY
oExcelPivotSheet.PivotTables("PivotTable1").PivotFields("Cost").NumberFormat = "_($* #,##0_);_($* (#,##0);_($* ""-""??_);_(@_)"

-Pete
Games the old fashion way with Dice, Paper and Pencils!

 

[BlindPete]

Oh my mistake was I was referencing the incorrect field. "Cost" is the column that the pivot table uses to calculate, however the field is "Sum of Cost" in the data area.

Thanks Anyhow!

-Pete
Games the old fashion way with Dice, Paper and Pencils!

 

[SkipVought]

Hi,

"I can do it manually..."

Turn on your macro recorder as you format.

Skip,

_{When a diminutive clarvoyant had disappeared from detention, headlines read...
Small Medium at Large}