I'm not sure if I really understand your query but my experience has been
that the rotation is relative to a point x number of pixels from the left
screen edge and y number of pixels from the top screen edge which the user
can set when using the AddShape method. If this is the zero base point you
refer to, it can be set by you when you add the shape in just about all
cases. This includes freeforms.

"CLR" wrote:

Hi All............
I know how to rotate a Shape from it's present orientation to so many
degrees of "increment"....this works fine for that

Sub Rotate15()
ActiveSheet.Shapes("Group 34").IncrementRotation 15.01
End Sub

What I need to know, is how to establish a base zero point for the Shape,
and then have the macro rotate the Shape "TO" 15.01 degrees from that base
point,, not just increment it from where it is now.....

TIA
Vaya con Dios,
Chuck, CABGx3