Create Pivot table with VBA Macro

Create Pivot table with VBA Macro.
Download Practice File :
iturninstitute.com/excel_excercise.zip
Udemy course details:
1. MS Office Training: www.udemy.com/...
2. Excel VBA Training: www.udemy.com/...
3. Excel Training in Hindi: www.udemy.com/...
4. Excel Training in English: www.udemy.com/...
Courses in DVD:
1. Complete Excel (Excel + VBA - Macro) : www.amazon.in/...
2. Excel VBA - Macro Training: www.amazon.in/...
3. Excel Training in Hindi: www.amazon.in/...
4. Excel Training in English: www.amazon.in/...
Subbscribe to our youtube channel for latest update.
For Classroom training at Noida: www.iturninstitute.com
For our Blog: www.learnmiseas...
Download the app for full training videos and tricks on Excel :
play.google.co...
VBA Code:
Option Explicit
Sub trail_pivot12()
Dim mypivot As PivotTable
Dim mycache As PivotCache
Sheet3.Activate
Set mycache = ActiveWorkbook.PivotCaches.Create(xlDatabase, Range("a1").CurrentRegion)
Sheets.Add , Sheets(Sheets.Count)
Set mypivot = ActiveSheet.PivotTables.Add(mycache, Range("a4"), "Mypivot1")
mypivot.PivotFields("Item").Orientation = xlRowField
mypivot.PivotFields("Client").Orientation = xlColumnField
mypivot.PivotFields("Sold").Orientation = xlDataField
End Sub

[@sakib0072]

Thanks ! Clean n helpful 😎😎😎

[@anandusolanki]

Each step of VBA Macro has been present perfectly. Nice Teaching methodology. it really help me a lot.

[@ggkjghkjh]

What is the value to be used for filter. Its good that you have mentioned about the row column and data but i need the filter data as well

[@mehboobmaniyar1890]

Really nice explanation

[@Ksathwik94]

Thank you. Very helpful

[@trainingbyhimanshu]

Glad it helped.

[@neetshil1434]

greate explanation.. its helpful

[@sanjaynoudiyal9467]

Perfect sir. I needed it.. Finally you have done my query... Thanks a lot..

[@rakshyit]

Thank you for such a nice explanation. I have a small query. As per the code mentioned by you, I am able to create pivot table, but if I want that table to be sorted in descending order, then how. I tried but it's not working. below is my code.
Dim datepivot As PivotTable
Dim datecache As PivotCache
Sheet2.Activate
Set datecache = ActiveWorkbook.PivotCaches.Create(xlDatabase, Range("A2").CurrentRegion)
Set datepivot = ActiveSheet.PivotTables.Add(datecache, Range("b2"), "Mypivot1")
datepivot.PivotFields("Date").Orientation = xlRowField
datepivot.PivotFields("Net Premium").Orientation = xlDataField
datepivot.PivotFields("Net Premium").AutoSort Order:=xlDescending, Field:="Net Premium"
Last line is the sorting thing, it's not throwing any error, but also not sorting.
Please help.

[@manaswinisahoo4555]

I m your new subscriber
Very helpful vdo

[@sheharyarch6317]

Clean n Helpful. Thanks You

[@makwanamanoj8584]

Really helpful...nice and best content

[@trainingbyhimanshu]

Thanks🙏

[@velperumal6986]

HI Bro, Run Time Error 1004 'Unable to get the PivotFields property of the PivotTable class', How to fix this error

[@shimonatiwari9954]

Hi, this is the best and easy pivot option I have ever seen..just want your little help I want to add a command of sorting the data from largest to smallest number in pivot..is that possible?

[@ganeshgaikwad8810]

Hi sir i want to know how to change the value like sum or count in xldatafield

[@Ramyadav-tv1rz]

Really very nice and useful. Thanks you very much for such video !

[@1431jagan]

Hi Himanshu i tried using same code in VBA it is showing error as "Invalid procedure call or Argument"

[@deb1995]

it is showing as compile error : variable not defined in the sub trail_pivot12() line

[@merugubhanu3334]

I wanted to create the data in specific worksheet how can we do that

[@indiangraphics1111]

fantastic job bro

[@trainingbyhimanshu]

Thanks

[@satishchaurasia84ya]

Woow perfect nice way of teaching. Thank you so much keep it up

[@trainingbyhimanshu]

Thank you for appreciation

[@a.b.c.0.2]

Thanks for this video, this video is easy to learn and understand micro.

[@rakeshjoshi766]

Hello, when i am using this code i am unable to do create pivot table, just adding a sheet after run the macro. Plz suggest.

[@trainingbyhimanshu]

What's the error you are getting

[@rakeshjoshi766]

@@trainingbyhimanshu - first i create a button then use your code Dim mypivot.................. to
Set mypivot =............ "Mypivot1")
After use this code nothing is happened only create new sheet.

[@shaikhaziz9703]

Dear Sir, Please help me to find out below solution,
what if i want to start my pivot table from second row because first row is merged i want to start my pivot from second row..according to your code i have tried to changed mycache range from ("A1") to ("A2")...it's not working...please help

[@trainingbyhimanshu]

Type the complete code here

[@srivatsaniyer8948]

How to add more pivots in same worksheet

[@giteshbhoir9086]

Thank you !! helpful

[@chhinuchhuria9347]

Thanks sir

[@sureshjogi9626]

very good explanation and useful for learning VBA users and thanks

[@trainingbyhimanshu]

Thank you...

[@swaroopsinha9648]

Sir, first of all thank you for sharing this, I have went through many video on this topic but your video was really simple but exactly what anyone can learn,, simply amazing,, sir if you teaching macro then I would love to learn please let me know.. And also can you help me with putting filter on the pivot i.e. above to the xlrow.. Many thanks sir

[@trainingbyhimanshu]

Thank you Swaroop. Very soon video will come stay connected

[@arsidagamer]

How can i do max of items instead of sum in the same code?

[@shreeyasingh6359]

Can you please mention the syntax for creating pivot in an existing sheet

[@mrandmrscooking206]

Don't type sheets.add command.. rather while setting mypivot give the cell reference where you want to create pivot table

[@sandyk3264]

Is it pssbl to filter only one item, ignoring other. Being evertime i need to shoose same filtr but other keep changing. So, if i mention them in vba it will give error nxt time.

[@trainingbyhimanshu]

Your question not clear. You mean to say filter through VBA in Pivot.

[@sandyk3264]

Training by Himanshu: yes. My only one item is fixed evertime in data, but i need to deselct lots of others, to select that one item. Ex: 4 items, a,b,c &d. I need to put true for a, and false for other 3.

[@nileshghanate3377]

Very nice video.. Explanation is in very simple language, easy to understand. I am expecting more useful videos on some advanced level coding.

[@gsc221315]

The code is running fine in Module but not in Command Button ..why so ?

[@trainingbyhimanshu]

Command button also need to be coded. Watch the video carefully

[@shivkumar3435]

Kya age factor h Vba me job ke liye. 30 ke par wale ke liye h.

[@trainingbyhimanshu]

Yes why not...

[@abhishekkommera8965]

getting error type mismatch "13" in set mycache

[@ghazikhan3133]

How to code it if you want to create the pivot in existing sheet?

[@trainingbyhimanshu]

Rather then sheets.add line type the sheet reference where you want to create pivot table...

[@ghazikhan3133]

@@trainingbyhimanshu thanks a lot btw my colleagues are getting error at (wdformatrichtext) step, are they missing any set up in there excel or outlook for version 2010 and 2016. How should I fix it.. please help

[@trainingbyhimanshu]

@@ghazikhan3133 clarify.. not getting

[@ghazikhan3133]

@@trainingbyhimanshu sorry this was not related to this video

[@aroraankit873]

Getting Run-Time error 1004 unable to get the current region property of the range class

[@tarunsingh7107]

It is giving error of type match in mycatche pls help

[@nehakharche6752]

Getting 1004 error we can't change this part of the pivot table

[@paddyp8546]

Showing error at Set mycache line

[@saiprakashpawar133]

Hi Sir
This is really good Video, Thank you:-)

[@trainingbyhimanshu]

Saiprakash Pawar Thanks

[@trainingbyhimanshu]

Thank you

[@allaboutvideos5472]

Nicely explained☺

[@trainingbyhimanshu]

All About Videos Thanks..

[@sanjeevsingh1489]

Thanks

[@AshwaniKumarshakya]

Code not working in another file
Repeated in same file

[@user-ix9hb7je4lGaurav]

It’s showing me mismatch 13 error

[@trainingbyhimanshu]

Coding error. Check your coding.

[@faltooo3446]

CODE NOT WORK PROPERLY .