HowTo: Trigger ShapeAction in OrgChart

[Stefan Rauchegger]

I want to rearrange Subordinates and tried to call the trigger method
of the action-cell, but nothing happens


Public Sub ReLayoutShape(myShape As Shape)
'Shape mit ID=7 ... in diesem Fall ein Manager
ActiveWindow.Select myShape, visSelect
myShape.Cells("Actions.Row_1").Trigger

End Sub

This should be the proper Action (in accordance with Shapesheet)

Do I miss anything?

Can I give certain parameters to this action?
-which layout-type?

TIA

Stefan

 

[junethesecond]

"Actions.Row_1" should be "Actions.Row_1.Action".
How did you write in the action cell of "myshape". I triyed to put
"CALLTHIS("ReLayoutShape",)" in action cell of "Actions.Row_1" , and
"TEST" in menu cell. If this is correct, "ActiveWindow.Select myShape,
visSelect" is again select "myshape" which is already selected, and invoke
again command in the same action cell, and it may fall in loop.