CaptionHAlignment Property Example

This example formats totals and their captions in the PivotTable list.

Set c = PivotTable1.Constants
Set view = PivotTable1.ActiveView
For Each ttl In view.DataAxis.Totals
    ttl.HAlignment = c.plHAlignRight
    ttl.CaptionHAlignment = c.plHAlignRight
Next