О работе с графическими объектами в макросе

[Vladyank]

Есть сложные составные графические объекты с какими-то вроде даже как и именами (? или это не имена?): Группа 9, Группа 33 и т д. Когда я пытаюсь присвоить этой Группе 9 имя - ничего не получается...
Как с этим работать, кроме как c применением выделения и копирования мышкой?

[Шпец Докапыч]

Когда я пытаюсь присвоить этой Группе 9 имя - ничего не получается...

Попробуйте написать "НовоеИмя" прямо вместо "Группа 9".

[Vladyank]

"НовоеИмя" присвоить удалось, но как с этим работать? Как привязать этот объект "НовоеИмя" к друкой ячейке без мышки и буфера? Как потом заменить один объект на другой в цикле (или в VBA)?
Я ещё вопросами не достал?

[Шпец Докапыч]

"НовоеИмя" присвоить удалось, но как с этим работать?

Если Вы можете справиться с одной фигурой, то и с составной тоже не будет проблем:

Код Выделить Развернуть

Sub Test_ShapeRange()
  Dim MyGroup As Shape
  Set MyGroup = ActiveSheet.Shapes("Группа 19")
  MyGroup.Top = MyGroup.Top + 50 'например
End Sub

[Vladyank]

Большое спасибо, объект "задвигался". А как можно переместить объект в другую книгу по конкретному адресу?

[Шпец Докапыч]

А как можно переместить объект в другую книгу по конкретному адресу?

Запишите макрорекордером её (группы) копипаст, вот и всё.

[Vladyank]

Спасибо Вам большое.Кстати, я теперь  смогу использовать свойства и методы объекта Shape и Shapes. Спасибо