OLEFormat.DisplayAsIcon 属性 (Word)

如果指定对象显示为图标,则该属性值为 True。 读/写 Boolean

语法

expressionDisplayAsIcon

表达 一个代表“OLEFormat”对象的变量。

示例

本示例显示一个消息框,框内包含活动文档中每个显示为图标的浮动图形名称。

Dim shapeLoop As Shape 
 
For Each shapeLoop In ActiveDocument.Shapes 
 If shapeLoop.OLEFormat.DisplayAsIcon Then 
 MsgBox shapeLoop.Name & " is displayed as an icon." 
 End If 
Next shapeLoop

本示例将 Microsoft Excel 工作表作为链接的 OLE 对象插入活动文档,然后将该对象的显示更改为图标方式。

Dim objNew As Object 
 
Set objNew = ActiveDocument.Shapes.AddOLEObject _ 
 (FileName:="C:\Program Files\Microsoft Office" _ 
 & "\Office\Samples\samples.xls", LinkToFile:=True) 
 
objNew.OLEFormat.DisplayAsIcon = True

另请参阅

OLEFormat 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。