Placement of a chart

P

PCLIVE

I've got code to add a chart to my worksheet (below).

Range("A1:A10").Select
Charts.Add
ActiveChart.ChartType = xl3DColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Results").Range("A1:A10"),
PlotBy:= _
xlRows
ActiveChart.Location Where:=xlLocationAsObject, Name:="Test"

Now if I want to move that chart, I can use the following code.

ActiveSheet.Shapes("Chart 1").IncrementLeft -63#
ActiveSheet.Shapes("Chart 1").IncrementTop -153#

Is there a way I can specify exactly where I want the left side of the chart
to start. For example, if I want the chart to start where column F starts,
how could I do this?

Thanks,
Paul
 
P

PCLIVE

Ok,

I came up with this method.

ActiveSheet.Shapes("Chart 1").Left = ActiveSheet.Columns(6).Left
ActiveSheet.Shapes("Chart 1").Top = ActiveSheet.Rows(1).Top

This starts the left side of the chart at the start of column F, and the Top
side of the chart at the start of Row 1.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top