How to create pivot table using vba code

Veröffentlicht am: 20 Mai 2020
auf dem Kanal: VBA Learning tutorials

186

How to create pivot table using vba code

Sub CreatePivotTable()

Dim pc As PivotCache
Dim pt As PivotTable
Dim pf As PivotField

Set pc = ThisWorkbook.PivotCaches.Create(xlDatabase, SourceData:=Sheet1.Name & "!" & Sheet1.Range("A1").CurrentRegion.Address, Version:=xlPivotTableVersion15)

Worksheets.Add

Range("A1").Select

Set pt = pc.CreatePivotTable(TableDestination:=ActiveCell, TableName:="Emp Report")

Set pf = pt.PivotFields("Product")
pf.Orientation = xlRowField

Set pf = pt.PivotFields("Region")
pf.Orientation = xlColumnField

Set pf = pt.PivotFields("Name")
pf.Orientation = xlDataField

ActiveSheet.PivotTables("Emp Report").NullString = 0

End Sub

Auf dieser Seite können Sie das Online-Video How to create pivot table using vba code mit der Dauer stunde minuten sekunde in guter Qualität ansehen, das der Benutzer VBA Learning tutorials 20 Mai 2020 hochgeladen hat, den Link mit Freunden und Bekannten teilen, dieses Video wurde auf Youtube bereits 186 Mal angesehen und es wurde von 4 den Zuschauern gefallen. Viel Spaß beim Betrachtenden Zuschauern gefallen!

550