rotate a bar around a circle in excel

[Stanley91]

I Want to rotate a bar around a circle in excel. I have the x and y offset of the bar set so the circle is at the bars end point.

Using the following code the bar rotates about its mid point. How do I alter the code so it rotates about the circle I have at its end point?

Please Login or Register  to view this content.

Thanks Paul

[Andy Pope]

Perhaps you can post example workbook so we can know what you mean by bar.

[Stanley91]

Sorry its a rounded rectangle. Perhaps the following image explains it better? When I press play I want the rounded rectangle to rotate around the circle instead of its midpoint.

Capture.PNG

[Andy Pope]

No not really, when I press the button nothing happens!

[Stanley91]

Ok, there's an example there

Book1_example.xlsx

[Stanley91]

Code for button 1

Please Login or Register  to view this content.

Code for button 2

Please Login or Register  to view this content.

[Andy Pope]

Keep it simple, in terms of calculating the position, by grouping with another shapes and rotate that about it's center.

Obviously once you see how it's done you can format the rectangle to have no fill.

[Stanley91]

Ah I see! Cheers! Is there a way of rotating without grouping?

[Andy Pope]

Sure, but you would have to recalculate the left/top position of the shape given it's rotation.

[Stanley91]

Using a rotation matrix?

[Andy Pope]

Don't know what that means.

[Stanley91]

I mean do you use a rotation matrix to recalculate the left/top position of the shape given it's rotation?

[Andy Pope]

You just added more words rather than explained what a rotation matrix is.

This code will rotate the shape around a point.

Please Login or Register  to view this content.

[Stanley91]

I meant I thought the new left position would become xcos theta + ysin theta and the new top position -xsin theta + ycos theta, never mind I was getting confused...

Thanks for the code and you're time in helping me with this problem, I understand now.