PivotTable question

[bojzon]

If I run VBA routine (Win XP. excel 2003):

ActiveSheet.PivotTables("PivotTable1").PivotSelect ("'Row Grand Total'"), xlDataAndLabel, True
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Selection.Font.Italic = True

I get 1004 ERROR (about false formula)
I did some variation with "' '" without success.

If I run the same routine with F8 step by step, code go through without ERRORS.

How come, any idea?

 

[xlbo]

You will need to use " " only around the name and I would've thought that you will need to reference the field that you are looking for the grand total for:

ActiveSheet.PivotTables("PivotTable1").PivotSelect ("FieldName Grand Total"), xlDataAndLabel, True


Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question