VBA - Обращение в VBA к Oval и изменение свойств в Power Point

Vladislava-smile · Отправлено: **06:37, 22-05-2014** | #2

Вопрос решен.

Vladislava-smile · Отправлено: **09:51, 22-05-2014** | #3

А подскажите еще вопрос. Можно ли как и в Exel сделать автоматический запуск макросов при запуске презентации?

Vladislava-smile · Отправлено: **02:45, 23-05-2014** | #4

С овалами разобралась уже. Спасибо. Под запуском подразумевается показ слайдов.

А можно ли в связке 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

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