Новости:

Название темы должно отражать суть задачи.
Темы типа "ПОМОГИТЕ!!!", "Срочно!" и т.п. будут удаляться без объяснения причин

Главное меню

Работа с объектами

Автор Vladislava-smile, 23.05.2014, 02:43:15

« назад - далее »

Vladislava-smile

А можно ли в связке Power Point и VBA делать следующие вещи:
В слайде презентации у нас есть 3 прямоугольника. Нужно, что бы при наведении или при щелчке на этот объект при просмотре презентации выдавалось сообщение о названии этого объекта и его индексе. Писать макрос на каждый объект и привязывать его через действие не вариант - таких объектов по всей презентации около 500 штук. Нашла только, чтобы выводился общий список.
Sub Auto_open()
Set sh = ActiveWindow.Selection.SlideRange.Shapes
Im = ""
For Each fr In sh
Im = Im & fr.Name & vbCrLf
Next
MsgBox Im
End Sub

(( Я в тупике, помогите, пожалуйста.

Vladislava-smile

#1
Нашла блок
Sub Shape3_Clicked()
End Sub

Только вот осталось понять как эту 3 на примере вытаскивать и записывать в переменную.

vikttur

#2
Дубль темы. Одна удалена.
Есть кнопка, предназначенная для оформления кода.


Это точная копия части сообщения из первой Вашей темы.
Вы опять создали тему с дублем (ЗАЧЕМ?), причем осознанно - и в прошлой паре близнецов, и в этой дополняете ответом обе!
Вы опять не оформили код, как положено!
Вы так и проситесь на блокирование (бан) Вашей учетной записи на этом ресурсе.
Пока что бан-предупреждение на сутки.


Дмитрий Щербаков(The_Prist)

В общем либо использовать классы(Работа с модулями классов), либо прописывать действие на каждый объект. Хотя, если выложите пример - может чего и можно будет придумать. Например назначить всем объектам один код и в нем определять объект.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...

Яндекс.Метрика Рейтинг@Mail.ru