Edit each separately

Allow any of your scripts to edit (for example rotate) each selected object separately with it's own center etc.? It is included in Adobe Illustrator a it is the only one feature I miss in Corel Draw 12.

Thanx for answer.

I use something like this to resize each object by itself. I hope to eventually polish out my own "multi" transform dialog. Anyway like this:

Sub TransformEach()
Dim S As Shape
Dim RotateAmt As Double

RotateAmt = 5

For Each S In ActiveSelection.Shapes

S.Rotate RotateAmt

Next S

End Sub

You can add this code to the "Apply" button in a dialog and retrieve the amount from a textbox the user can enter...