VBA code to move shape on overlapping bar chart to the end of the data series

[som3on3_10]

I have a bar chart with 3 overlapping values. Since it is overlapping there are certain bars that can't be seen so I have created a right bracket shape and dragged it to the end of the bar that is being covered up to show where the bar ends. Doing this manually is very time consuming and takes a very steady hand. Is there a way to accomplish this using VBA? I have attached a sample graph. So for example on the graph Category A is currently being covered up by Category B and C due to the order of which the bars are written in Excel. So to show where Category A Value1 (4) ends, I have created the right bracket and dragged and positioned it to the 4 spot on the chart. I have tried the macro recorder while moving the shape around and I can see the Selection.ShapeRange.IncrementLeft code, for example, being displayed, but this just seems like it's moving the shape left/right/up/down from the location where the shape originally was. Is there code that will move the shape and line it up with the bar to the value that is specified on the table to the left (i.e. cell B6)? I currently manage a bigger version of this chart that I update monthly where I am manually doing this with a steady hand and it is killing my brain cells. Any input or help is much appreciated. Thanks!

[xlbiznes]

hi,

the code to move the shape would be like this:

Please Login or Register  to view this content.

[som3on3_10]

In your code, what does the Range("L5").Top represent? It doesn't make sense if it's referencing cell L5 because that cell is blank. Also specifically what does the .Top code represent? Thanks!

[xlbiznes]

it will align your shape to the top of the cell L5.

Top & Left are the position values.

[som3on3_10]

Is there a way to align the shape to a specific spot on the graph such as the end of a data series?