• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 445
  • Last Modified:

MS Excel VBA 2010 Graph ScaleType

I have a problem upgrading from MS Excel 2003 to 2010. The Scaletype does not exist anymore, and it does not accept xlLinear anymore.


Worksheets("ABCDEF").Activate
ActiveSheet.ChartObjects("Graph1").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.Axes(xlCategory, xlSecondary).Select
    With ActiveChart.Axes(xlCategory, xlSecondary)
        .MinimumScale = 0
        .MaximumScale = 500
        .MinorUnitIsAuto = True
        .MajorUnitIsAuto = True
        .CrossesAt = 0
        .ReversePlotOrder = False
       '.ScaleType = xlLinear
        .DisplayUnit = xlNone
        .TickLabels.NumberFormat = "general"
        .TickLabels.Font.Size = 9
       
    End With
0
Frans_Truyens
Asked:
Frans_Truyens
  • 5
  • 3
1 Solution
 
Rgonzo1971Commented:
Hi,

pls try

ScaleType = xlScaleLinear

Regards
0
 
Frans_TruyensAuthor Commented:
I tried already. The constants give the same value. They return the same integer.
0
 
Rgonzo1971Commented:
Could you send a dummy?
0
Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
Frans_TruyensAuthor Commented:
I tried to send logaritmacally, just to try but it does not work. In Excel 2003 it works fine, but not in 2010
0
 
Frans_TruyensAuthor Commented:
The second axis just disappears when you omit this constant. But when you put it there, it doesn't work. It is something that worked fine in MS Excel 2003 but not in 2010. Is there a workaround?
0
 
Frans_TruyensAuthor Commented:
We solved the problem. It was something else in the code.
0
 
Frans_TruyensAuthor Commented:
Thanks a lot.
0
 
Rgonzo1971Commented:
Thanks
0

Featured Post

Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

  • 5
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now