RowGrand Property Example

This example sets the PivotTable report to show grand totals for rows.

Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
pvtTable.RowGrand = True