Home > OS >  How to change primary and secondary unit of a chart (scatter plot) in vba in MS-Access?
How to change primary and secondary unit of a chart (scatter plot) in vba in MS-Access?

Time:12-25

I make a scatter plot chart with Access and I preset the primary unit to 250000 and the secondary unit to 50000. Initial chart To change the minimum and maximum of the chart with the textbox above the chart, I finally find the right chart properties with this code :

        Graphique1.Object.axes(1, 1).minimumscale = Texte2.Value  ' For minimum x axe 
        Graphique1.Object.axes(2, 1).minimumscale = Texte2.Value  ' For minimum y axe 
        
        Graphique1.Object.axes(1, 1).maximumscale = Texte4.Value  ' For maximum x axe 
        Graphique1.Object.axes(2, 1).maximumscale = Texte4.Value  ' For maximum y axe

But, when, for example, I focus on my chart and set the maximum scale to 120000, I lost the primary unit. So, I want to change its value, but I don't know where I can find this variable.

I tried to find something in MS-Access documentation, so I tried this code but it makes an Execution error '438'

        Graphique1.Object.axes(1, 1).primaryunit = 1000
'''
or
'''
        Graphique1.Object.axes(1, 1).PrimaryValuesAxisDisplayUnits = 1000

Does someone know how to change this chart property ? Thanks

CodePudding user response:

Example below will modify Y axis units. Instead of repeating Graphique1.Object, could use With:

With Graphique1.Object         
...
   .Axes(xlValue).MinorUnit = 200
   .Axes(xlValue).MajorUnit = 1000
...
End With

Use xlCategory for X axis.

If you prefer numeric equivalents:
xlValue = 2
xlCategory = 1

  • Related