Pivot table

S

SotjeRuud

Hi there again,

Does anyone know how to make a selection for a pivot table variable
accor5ding tot the actual number of lines in the sourcefile?

Specificalle this piece of code: .......siteOrder'!R1C1:R2450C6"
----------------------------------------------------------------------------
--------------------
Workbooks(MyVar).Activate

ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
"'[Item_Master_Sheet_20030828.xls]Sheet_for_siteOrder'!R1C1:R2450C6"
_
, TableDestination:="R1C1", TableName:="PivotTable1"
ActiveSheet.PivotTables("PivotTable1").AddFields RowFields:= _
"Current Item Number in Logistics", ColumnFields:= _
"User Item Type (Productgroup)"
With ActiveSheet.PivotTables("PivotTable1").PivotFields( _
"Current Item Number in Logistics")
.Orientation = xlDataField
.Name = "Sum of Current Item Number in Logistics"
.Function = xlSum
End With
----------------------------------------------------------------------------
--------------------

Would appreciate suggestions.

regards
Ruud
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBA Pivot Table Error 1
Pivot table 2
syntax in VBA to create a pivot table 2
Playing back a Pivot Table macros 2
Format Pivot total rows 2
Avoiding an extra sheet when creating a pivot table 3
Pivot Table Macro with dynamic source data 1
Macro to update pivot table data range 3

Top