Word + ActiveX + Macros

Программирование на Visual Basic for Applications
rkd
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 18.04.2005 (Пн) 23:29

Word + ActiveX + Macros

Сообщение rkd » 18.04.2005 (Пн) 23:30

Написал макрос. В макросе необходимо достучаться до ActiveX объекта.

Делаю так
MsgBox ActiveDocument.Shapes("ActiveXXX").OLEFormat.Object.Text

т.е. у ActiveX объекта есть св-во Text, оно то мне и надо.
Но макрос выдает ошибку, что нет такого объекта (он есть), по индексу тоже не работает:

MsgBox ActiveDocument.Shapes(1).OLEFormat.Object.Text

св-во Count
MsgBox ActiveDocument.Shapes.Count
дает ноль, хотя ActiveX есть на документе.


====

но если ActiveX предварительно создать в макросе, т.е.

Set myAx = ActiveDocument.Shapes.AddOLEControl(Anchor:=Selection.Range, _
ClassType:="ActiveCtrl.XXX.1")

то все что я привел выше работает, т.е. с помощью этого кода:
MsgBox ActiveDocument.Shapes("ActiveXXX").OLEFormat.Object.Text

я нормально получаю доступ к ActiveX.

Как же все-таки получить из макроса доступ к ActiveX?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 19.04.2005 (Вт) 5:28

Не Shapes, а OLEObjects.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

rkd
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 18.04.2005 (Пн) 23:29

Сообщение rkd » 19.04.2005 (Вт) 9:48

В Ворде вроде нет такого свойства, ты не Excel имел ввиду

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 19.04.2005 (Вт) 10:57

Тогда ещё InlineShapes.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

rkd
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 18.04.2005 (Пн) 23:29

Сообщение rkd » 19.04.2005 (Вт) 11:15

!!!
Спасибо огромное добрый человек :)
Все работает, елы палы как я проглядел это св-во, ведь несколько раз внимательно пролистывал все св-ва.


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 5

    TopList