Ask Your Question
0

Question - How Do I Create a Pivot Chart using a macro

asked 2018-05-10 21:32:14 +0100

Tavy_Dog_Walker gravatar image

I have created an automatic process to extract information from 40+ spreadsheets and build a Pivot Table (Data Pilot Table) from it. This includes adding a simple chart (also by macro) but this does not give me the functionality I am after. I want to extend the macro to include a Pivot chart sourced from the Pivot Table so that it is easy to select the data options to be included in the chart but I'm struggling to find information/help on the properties, methods, services etc. to do this, despite using xray on a manually created pivot chart of what I need. Can anyone point me to help files or an example of a macro to build a pivot chart using a pivot table as its source so I can move forwards? Thanks in anticipation......

edit retag flag offensive close merge delete

3 Answers

Sort by » oldest newest most voted
1

answered 2018-05-26 09:13:52 +0100

Tavy_Dog_Walker gravatar image

updated 2018-06-03 19:26:04 +0100

Apologies for the delay in posting. Attached file contains macros that create a Pivot Table and Pivot Chart based on it. It has been kept simple to aid understanding. The use of Xray or MRI is suggested for anyone who wishes to work out how to adjust features of the chart. Having initially struggled it was a relatively simple task but I have still not found a way to put the chart onto a separate sheet.

Many thanks to Ratslinger who passed me a lot of useful material.

C:\fakepath\Pivot-Pilot and Pivot Chart Example.ods

Update

Noting Ratslinger's answer to putting the Pivot Chart onto a different sheet and following questions from local friends, I have updated the file (see below) to include; a) Putting Chart onto another sheet. b) Setting a different Chart Type c) Making it a stacked version d) Improved presentation by grouping the date field in the DataPilot/Pivot, which reflects directly into the Pivot Chart.

C:\fakepath\Pivot-Pilot and Pivot Chart Example Updated.ods

edit flag offensive delete link more

Comments

@Tavy_Dog_Walker Thanks for the code. Took a quick look & looks good. Will look into it more this weekend & if I find something to move it to a different sheet (whenever that may be) I will post here. Will probably dig more into settings & see how/if/what can be modified as I did with regular charts. +1!!!

Ratslinger gravatar imageRatslinger ( 2018-05-26 15:42:08 +0100 )edit

Finally sat down with code. Easy to set chart on any sheet you want.

In the chart section, you can create sheet as you did for Pivot table (or use any sheet wanted), get the sheet by name and use that for the sheet in:

oPivotCharts = SHEET_YOU_CHOOSE.PivotCharts()

Works for me! Can provide any info if needed.

Ratslinger gravatar imageRatslinger ( 2018-05-27 05:06:20 +0100 )edit

I now feel like Homer Simpson ….Duoooh! I never thought of trying the obvious because I couldn't find a way to do it manually, so I just assumed . Thank you BIG TIME!!

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-30 12:40:03 +0100 )edit
0

answered 2018-05-11 12:03:19 +0100

Ding Duck gravatar image

Hi Tavy, perhaps this may lead you in the right direction. If I understand correctly you need to be able to get the chart to represent the data extracted from the Pivot Table? Please see attached a couple of screen shots for a very simple pivot Table. To create the Chart, highlight the Pivot Table; goto "Insert" menu; select "Chart". You can then create the chart based on the style you require. You can select the data to display by either the drop down arrow on the Table, or using the Drop down arrow on the chart. (see Date field on Bottom Left corner) I hope this helps or at least points you in the right direction? Cheersimage description(/upfiles/15260327899032051.png)

edit flag offensive delete link more

Comments

Thanks for responding. I am aware of manually inserting charts using the Ribbon commands and wizard. What I am trying to achieve is the same thing but programmatically so that my process that builds the pivot table also creates the Pivot Chart so that a less savvy user does not have to know of the intricacies of Calc and can easily get summarized information in a visual form.

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-11 18:36:18 +0100 )edit

I understand. Is your process simialr to the folloowing Pivot table parameters don't change? The macros extract the data from vaious sources and repopulate your Pivot table data source. Macro to remap the data source as file expands / shrinks etc The User Pivot table does not change, just the underlying Data source? Cheers.

Ding Duck gravatar imageDing Duck ( 2018-05-11 22:02:26 +0100 )edit

The user collects data from a large number of Spreadsheets (.ods and .xlsx) and build a Pivot table. The number of files and some parameters within the files will change over the months. The Pivot Chart is my preferred way of being able to show the user a visualised trend with some selection options to either focus on specific items or remove distractions . The user will not change either the underlying data, The pivot table or the proposed pivot charts. They are just users of a tool.

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-13 08:27:25 +0100 )edit
0

answered 2018-05-12 00:52:52 +0100

Ratslinger gravatar image

updated 2018-05-12 06:25:40 +0100

Hello,

Don't have much to offer but it may help. Until your question I had not used a Pivot Chart in any fashion. However have done a fair amount of macro coding using charts.

Haven't found anything specific on the API but using MRI it was nearly the same as what I had been doing. Reading the author's blog ( see -> Pivot charts in LibreOffice ) an item in Part 1 that struck me was the need to use a listener to detect Pivot Table changes so the data in chart could be updated. Using MRI, it appears (although a cursory glance) similar to what I had been doing in regard to loading data.. See code in samples on these posts:

Charts in Base forms

Inserting Chart using pyuno

Again, some brief playing around using MRI I was able to modify a variety of items in the chart. Very similar to what was done in Base charts post.

Unfortunately I am currently devoting a lot of time in database testing. Every once in a while I do poke my nose in this code as it interests me. If I come up with anything remotely creating a Pivot Chart using a macro I will post the information.

Edit:

You may have this already but here is code to get to data provider (this generated by Mri):

Sub Snippet
  Dim oSheets As Variant
  Dim oObj1 As Variant
  Dim oPivotCharts As Variant
  Dim oObj2 As Variant
  Dim oEmbeddedObject As Variant
  Dim oDataProvider As Variant
  oSheets = ThisComponent.getSheets()
  oObj1 = oSheets.getByName("YOUR_SHEET")
  oPivotCharts = oObj1.getPivotCharts()
  oObj2 = oPivotCharts.getByName("YOUR_PIVOT_CHART_NAME")
  oEmbeddedObject = oObj2.getEmbeddedObject()
  oDataProvider = oEmbeddedObject.getDataProvider()
End Sub

In the meantime I hope some of the above gives you a little bit more direction.

edit flag offensive delete link more

Comments

Gratefully received. I will investigate further later today. You have confirmed that there is not a lot of info available (at least not obviously!). If I make progress I will post findings to help others. I know trail blazing can be hard work!!

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-12 08:56:41 +0100 )edit

@Tavy_Dog_Walker Not sure if you saw it. In the post on Base Charts in the comments, I did point to a great source for chart API. If you missed, here is the link -> Common Parts of all Chart Types. Turned out to be an invaluable source of information. I see much of that also in Pivot charts. What is missing is the specifics on data provider. Listeners are a different subject but not difficult.

Ratslinger gravatar imageRatslinger ( 2018-05-12 18:37:40 +0100 )edit

Also note other sections there on charts. All of it is useful.

Ratslinger gravatar imageRatslinger ( 2018-05-12 18:39:12 +0100 )edit

Very useful Info. Whilst charts have same structure, I'm trying to clarify how to utilise Pivot Table as a source. I've made a little progress on this but it looks like some trial & error steps are required whilst I get the model of the concept into my head!

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-12 19:27:28 +0100 )edit

Process is now working except being able to place the Pivot Chart on a separate sheet from the Pilot (Pivot) Table. This may not be possible as I have not found a way to do it manually yet. I'll build a demo file for sharing later this week (Can't share the actual data).

Tavy_Dog_Walker gravatar imageTavy_Dog_Walker ( 2018-05-14 19:13:49 +0100 )edit

Thanks for the note. Look forward to sample! Please post as answer to your own question.

Ratslinger gravatar imageRatslinger ( 2018-05-14 20:10:00 +0100 )edit

My solution is the Data file will be updated monthly via macros (yet to write). The Users want the same sort of information and have created separate Pivot Tables & Chart for each criteria. Users can still filter depending options included on the Pivot Table. I found it easy to set up & gives Users choices of what to display. <right click=""> on the Chart, <export as="" image=""> if you want to include in another document /home/ding/Pictures/Membership 2.png Still a WIP at this end

Ding Duck gravatar imageDing Duck ( 2018-05-15 02:34:49 +0100 )edit
Login/Signup to Answer

Question Tools

2 followers

Stats

Asked: 2018-05-10 21:32:14 +0100

Seen: 326 times

Last updated: Jun 03 '18