What is more generic than what I gave you?

All you have to do is click in the column in the pivot table you want
formatted and run the macro.

--
Regards,
Tom Ogilvy


"dpci_ajp" wrote:

What I'm trying to do is make this macro totally GENERIC:
With ActiveSheet.PivotTables("PivotTable3").PivotFields ("Sum of Allowed")
.NumberFormat = "#,##0"
End With
Is that possible?
--
Ame


"Tom Ogilvy" wrote:

Sorry, I didn't realize you didn't know how to do a currency numberformat as
well as not knowing how to get the field from the activecell.

ActiveCell.PivotField.NumberFormat = "$#,##0.00"

--
Regards,
Tom Ogilvy


"dpci_ajp" wrote:

I'm trying to format the entire FIELD as currency.
--
Ame


"Tom Ogilvy" wrote:

ActiveCell.PivotField.NumberFormat = "0"



--
Regards,
Tom Ogilvy


"dpci_ajp" wrote:

I frequently use Currency Format, no decimals, for my pivot table field
formats. I cant figure out how to program Active pivot table, Active field
in a macro.
--
Thanks,
Ame