Forum Home
Press F1
 
Thread ID: 1804 1999-06-17 00:05:00 Excel 2000 macros Guest (0) Press F1
Post ID Timestamp Content User
2164 1999-06-17 00:05:00 I have the following section of a macro to create a Pivot table and want to use the CurrentRegion as the SourceData reference instead of the Name 'Database'. How do I do this?

ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:='Database' _
, TableDestination:='', TableName:='PivotTable2'
ActiveSheet.PivotTables('PivotTable2').AddFields RowFields:=Array('T', _
'Subject')
With ActiveSheet.PivotTables('PivotTable2').PivotFields ('Dur')
.Orientation = xlDataField
.Function = xlSum
End With
Guest (0)
1