VBA Help to change Form of Smart Art Nodes

[SandyX]

Hi,

I have a nice file, where I can change almost everything in a generated SmartArt hierarchy (or, as i use it as a WBS/ Project Hierarchy) by Data, Fonts, and color of cells.
But if I want to change the AutoShapeType from msoShapeRectangle to msoShapeRoundedRectangle nothing would work, but to change all the boxes by hand.

Is there any VBA way to get a solution for this?

many thanks in advance,
Sandy