This example hides column C on Sheet1.
Worksheets("Sheet1").Columns("C").Hidden = True
This example hides the second level member [state].[states].[CA].[Covelo]
of the first cube field in the first PivotTable report.
ActiveSheet.PivotTables("PivotTable1").CubeFields(1) _
.TreeviewControl.Hidden = _
Array(Array(""), Array(""), _
Array("[state].[states].[CA].[Covelo]"))