Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает объект , представляющий интерфейс верхнего уровня указанного объекта OLE. Только для чтения.
Синтаксис
expression. Объект
выражение Переменная, представляющая объект OLEFormat .
Возвращаемое значение
Объект
Замечания
Это свойство позволяет получить доступ к свойствам и методам приложения, в котором был создан объект OLE.
Используйте функцию TypeName для определения типа объекта, возвращаемого этим свойством для определенного объекта OLE.
Пример
В этом примере показан тип объекта, содержащегося в форме 1 на слайде 1 в активной презентации. Фигура 1 должна содержать объект OLE.
MsgBox TypeName(ActivePresentation.Slides(1) _
.Shapes(1).OLEFormat.Object)
В этом примере показано имя приложения, в котором был создан каждый внедренный объект OLE на слайде 1 в активной презентации.
For Each s In ActivePresentation.Slides(1).Shapes
If s.Type = msoEmbeddedOLEObject Then
MsgBox s.OLEFormat.Object.Application.Name
End If
Next
В этом примере текст добавляется в ячейку A1 на листе в книге Microsoft Excel, содержащуюся в форме три на слайде в активной презентации.
With ActivePresentation.Slides(1).Shapes(3)
.OLEFormat.Object.Worksheets(1).Range("A1").Value = "New text"
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.