This code creates a pivot table with the selected range and places it in a new worksheet.
VBA Code:
Sub CreatePivotTable()
Dim sourceData As Range
Dim pivotTable As PivotTable
Dim pivotSheet As Worksheet
Set sourceData = Selection
Set pivotSheet = Worksheets.Add
Set pivotTable = pivotSheet.PivotTableWizard(sourceData, TableDestination:=pivotSheet.Range("A1"))
End Sub
Join Our WhatsApp Group
Nazim Khan (Author) 📞 +91 9536250020
[MBA in Finance]
Nazim Khan is an expert in Microsoft Excel. He teaches people how to use it better. He has been doing this for more than ten years. He is running this website (TechGuruPlus.com) and a YouTube channel called "Business Excel" since 2016. He shares useful tips from his own experiences to help others improve their Excel skills and careers.
