blackdog2003 respondió:
Ante todo recibe un cordial saludo. Tu duda es un poco complicada pero de todas maneras aquite envío algo para ver si te sirve, intenta insertando este códiogo en el evento Click de tu CommandButton: ActiveSheet.Shapes("Elemento").Select Donde...