ThecodeMaster
Gebruiker
- Lid geworden
- 23 jun 2009
- Berichten
- 56
Ik zou graag willen dat de macro een draaitabel gaat maken.
Omdat ik het niet exact wist hoe dit ging heb ik eerst een macro opgenomen.
Daaruit kwam de volgende code:
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Blad1!R4C2:R919C23").CreatePivotTable TableDestination:= _
"'[TDK-BAK.xls]ADRES'!R1C1", TableName:="Draaitabel1", DefaultVersion:= _
xlPivotTableVersion10
Echter bij de uitvoer in de macro krijg ik een foutmelding "ongeldige procedure aanroep, fout nr 5."
Case:
1) Workbook = activeworkbook, hierin staan op Blad1 de te gebruiken gegevens.
2) TDK-BAK.xls = het nieuwe workbook met tabblad ADRES.
Gegevens uit 1 moeten in een draaitabel in 2 komen.
Wie kan me helpen.
Werner
Omdat ik het niet exact wist hoe dit ging heb ik eerst een macro opgenomen.
Daaruit kwam de volgende code:
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Blad1!R4C2:R919C23").CreatePivotTable TableDestination:= _
"'[TDK-BAK.xls]ADRES'!R1C1", TableName:="Draaitabel1", DefaultVersion:= _
xlPivotTableVersion10
Echter bij de uitvoer in de macro krijg ik een foutmelding "ongeldige procedure aanroep, fout nr 5."
Case:
1) Workbook = activeworkbook, hierin staan op Blad1 de te gebruiken gegevens.
2) TDK-BAK.xls = het nieuwe workbook met tabblad ADRES.
Gegevens uit 1 moeten in een draaitabel in 2 komen.
Wie kan me helpen.
Werner
Laatst bewerkt:
