Excel VBA Seleccione varias formas
ActiveSheet.Shapes.Range(Array("Oval 2", "Rectangle 1")).Select
The VBA Guy
ActiveSheet.Shapes.Range(Array("Oval 2", "Rectangle 1")).Select