OLEFormat.DisplayAsIcon, propriété (Word)

  • Article

True si l'objet indiqué est affiché sous forme d'icône. Boolean (en lecture/écriture).

Syntaxe

expression. DisplayAsIcon

Expression Variable qui représente un objet « OLEFormat ».

Exemple

Cet exemple montre comment afficher une boîte de message contenant les noms de toutes les formes flottantes apparaissant en tant qu'icônes dans le document actif.

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

Cet exemple montre comment insérer dans le document actif une feuille de calcul Microsoft Excel en tant qu'objet OLE lié, puis comment demander à afficher cet objet sous forme d'icône.

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

Voir aussi

OLEFormat, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.