Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Pivot Table
Can I write a macro for a pivot table defining the range as
Range("A3:K3", Selection.End(xlDown)).Select I'm trying with Dim rng As Range Range("A3:K3", Selection.End(xlDown)).Select ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatab ase, SourceData:= _ "rng").CreatePivotTable TableDestination:= _ "'[Combined Filtered.xls]Pivot'!R5C1", TableName:="PivotTable1", _ DefaultVersion:=xlPivotTableVersion10 And it tells me 'Nooooooooooo'. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Pivot Table
You could use the current region of cell A3. For example:
'========================= Dim ws As Worksheet Dim rng As Range Set ws = Sheets("Sheet1") Set rng = ws.Range("A3").CurrentRegion ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatab ase, _ SourceData:=ws.Name & "!" & rng.Address) _ .CreatePivotTable TableDestination:="", _ TableName:="PivotTable1" '====================== solomon_monkey wrote: Can I write a macro for a pivot table defining the range as Range("A3:K3", Selection.End(xlDown)).Select I'm trying with Dim rng As Range Range("A3:K3", Selection.End(xlDown)).Select ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatab ase, SourceData:= _ "rng").CreatePivotTable TableDestination:= _ "'[Combined Filtered.xls]Pivot'!R5C1", TableName:="PivotTable1", _ DefaultVersion:=xlPivotTableVersion10 And it tells me 'Nooooooooooo'. -- Debra Dalgleish Excel FAQ, Tips & Book List http://www.contextures.com/tiptech.html |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how to create pivot table from existing pivot table in excel 2007 | Excel Discussion (Misc queries) | |||
Pivot Table and Pivot Table dates are not in correct order | Charts and Charting in Excel | |||
Filter lines with Pivot table and non pivot table columns | Charts and Charting in Excel | |||
Filter lines containing pivot table and non pivot table data | Excel Worksheet Functions | |||
Help required with setting up a pivot table with the source on sheet1 to have the pivot table created on sheet called "report" | Excel Programming |