RowGrand Property
True if the PivotTable report shows grand totals for rows. Read/write Boolean.
Example
This example sets the PivotTable report to show grand totals for rows.
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
pvtTable.RowGrand = True