Eu faço não belive você posso mas como um recuo você pode lhes dar seu próprio nome assim que eles sou mais fácil de relacionar-se a:
activedocument. Formas (1). Nome = “Fred”
activedocument. Formas (“Fred”). Visível = falso
activedocument. Formas (“Fred”). Visível = retificar
ou
aplicação. Selection.ShapeRange.name = “Doris”
activedocument. Formas (“Doris”). Visível = falso
activedocument. Formas (“Doris”). Visível = retificar
Chris