Excel VBA Wybierz wiele kształtów
ActiveSheet.Shapes.Range(Array("Oval 2", "Rectangle 1")).Select
The VBA Guy
ActiveSheet.Shapes.Range(Array("Oval 2", "Rectangle 1")).Select