Setting Scroll Bar to default to the right

[#1]

In the attached chart I am trying to figure out how to set the scrollbar to default to the right.

How do you enable or insert a macro such as:

sub OneOff

set chart = ActiveDocument.GetSheetObject("CH23")
set p = chart.GetProperties
p.ChartProperties.XScrollInitRight = true
chart.SetProperties p

end sub

[mfikrirahmat]

why doesn't work in chart type pivot table , have a solution ?

Thank's

[kavitha_kommise]

hello spb,

i have checked  your test.qvw file,u have checked

Presentation->enable scroll axis->reversed

its working default as right if u open close the file as well , i am not understanding what is the need of using Macro.what is your exact requirement.

Can u please let me know so that it will helpful to me in future.

Thanks in advance,

kavitha