VBA constants from strings

[Jorgen]

Hi
I am trying to get a flexible use of the built in constants in VBA.

I tried
myShape="Baloon"
.AutoShapeType = "msoShape" & MyShape

And to get VBA to translate "msoShape" & MyShape to the constant value it should represent seems to be slightly tricky... Anyone that has any advice now right before the weekend?

Thanks,
Jörgen