VBA Chart wizard - Insert Footer

[PRodgers4284]

I have a macro to create a chart dynamically and i want to be able to add a footer or text to the bottom of the chart if possible, i would like to know what the property is to do this, my code is below:

Please Login or Register  to view this content.

[Andy Pope]

You can use axis titles, if not already being used.

Or a textbox.

Macro recorder should give you the code you need.

[PRodgers4284]

You can use axis titles, if not already being used.

Or a textbox.

Macro recorder should give you the code you need.

Thanks Andy

[PRodgers4284]

I have added this line of the code, but im not sure if im on the right track, i cant say any textbox on the chart.

Please Login or Register  to view this content.

[Andy Pope]

Looks okay to me.

Please Login or Register  to view this content.

[PRodgers4284]

Andy i cant see the footer on the chart, am i missing something?

[Andy Pope]

Hard to tell. Can you post example workbook where the chart is created but the footer does not appear.

[PRodgers4284]

Hard to tell. Can you post example workbook where the chart is created but the footer does not appear.

Andy i have it working , it was the size of the chart inside the userform window that i needed to adjust. Many thanks for your help Andy.

[Andy Pope]

Please Login or Register  to view this content.

[PRodgers4284]

Andy im trying to adjust the footer placement at the bottom of the chart, the textbox is appearing at the very bottom along the chart border, what is the syntax to change the bottom indent?

[Andy Pope]

This part adds the textbox with the Left,Top,Width,Height values calculated from the charts properties.

So change the 3rd argument.

Please Login or Register  to view this content.

[PRodgers4284]

Andy im getting a error with "AddTextbox" stating ("Wrong number of arguments or invalid property assignment") with the code below:

With ActiveChart
With .Shapes.AddTextbox(msoTextOrientationHorizontal, _
.PlotArea.InsideLeft + 40, _
.ChartArea.Top - 1, _
.ChartArea.Height - 5, _
.PlotArea.InsideWidth - 100, _
40)

[Andy Pope]

Please add code tags to your previous post.


Because you have 5 arguments.

Please Login or Register  to view this content.

I would guess you don't want the second top calculation.

Please Login or Register  to view this content.

[PRodgers4284]

Got it working