Hi Roger
Thanks for the reply. Its so simple when you know the syntax.

Where do you find syntax?

Kind regards
johnb

"Roger Govier" wrote:

Hi John

With ActiveSheet.PivotTables("PivotTable1")
.ColumnGrand = False
.RowGrand = False
End With

--
Regards
Roger Govier

"johnb" wrote in message
...
Hi Guys
I'm building a pivottable using ADO and VB and I need to hide the Grand
Totals both for colums and Rows. How do I do that in Code

TIA

johnb