How to create pivot table using vba code

Pubblicato il: 20 maggio 2020
sul canale di: VBA Learning tutorials
186
4

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


In questa pagina del sito puoi guardare il video online How to create pivot table using vba code della durata di ore minuti seconda in buona qualità , che l'utente ha caricato VBA Learning tutorials 20 maggio 2020, condividi il link con amici e conoscenti, su youtube questo video è già stato visto 186 volte e gli è piaciuto 4 spettatori. Buona visione!