anchor Arrow

[Stefan_Sand]

hi,

i have attached a small workbook with my simple (?) question.
I have a function, where i can let any shape rotate in my workbook, but when you look into it You can see, that i want to anchor (... maybe wrong word)
the arrow to the circle.... is there a possibillity to do this easy?

Function ShapeRot(ShapeName, Rot)
With ActiveSheet.Shapes(ShapeName)
.Rotation = Rot
End With
End Function


stefan

[HansV]

Have you tried grouping the arrow and the circle? You can then apply ShapeRot to the group.

If that is not what you want. please try to explain more clearly what you want to accomplish. Your workbook doesn't provide any clues.

[Stefan_Sand]

Hi Hans,

no, i don´t want to group the shapes, The origianl Idea behind it was to use this arrow as a gauge indicator and Windrose...
thats the idea behind it. The arrowfunction does what i want instead of leaving its base in one center point.

[HansV]

Excel is a spreadsheet program with limited graphics capabilities, not a vector drawing program.

What you want is very difficult, if not impossible in Excel.

[sdckapr]

Would a Speedometer chart suit yoru needs?

Steve

[Stefan_Sand]

of course steve!
I only wanted to know, if this could be possible by a graphical function. So You can attach shapes very well.

[sdckapr]

While the answer is that it probably can be done, the work involved can be complicated. It involves trying to figure out where the arrow will be as it rotates and then define the setup. Using the chart seems to be a much simpler method as it lets XL do the brunt of the work...

Steve