Здравствуйте. Давно мучаюсь с shapes. До сих пор для меня трудности вызывает проблема к ним обращаться. Самая беда когда есть одноименные фигуры.
Вопрос по циклу
Почему не совпадают номера?
И как например сделать что либо(выделить,удалить....) с фигурой zv1, находящейся в группе и наоборот? Как к ним обращаться правильно?
Вопрос по циклу
Код |
---|
Sub test() For Each p In Sheets("Лист1").Shapes nnn = ActiveSheet.Shapes.Range(p.Name).ZOrderPosition nn = p.ZOrderPosition 'почему номера не совпадают? If nnn <> nn Then Debug.Print p.Name End If Next p End Sub |
Почему не совпадают номера?
И как например сделать что либо(выделить,удалить....) с фигурой zv1, находящейся в группе и наоборот? Как к ним обращаться правильно?