Méthode OLEFormat.ConvertTo (Word)

Article
04/07/2023

Convertit l’objet OLE spécifié d’une classe en une autre, ce qui vous permet de modifier l’objet dans une autre application serveur ou de modifier la façon dont l’objet est affiché dans le document.

Syntaxe

expression. ConvertTo ( ClassType, DisplayAsIcon, IconFileName, IconIndex, IconLabel )

expression Obligatoire. Variable qui représente un objet OLEFormat.

Parameters

Nom	Requis/Facultatif	Type de données	Description
ClassType	Facultatif	Variant	Nom de l'application utilisée pour activer l'objet OLE. Vous pouvez voir une liste des applications disponibles s'affiche dans la zone type de l'objet sous l'onglet Créer, dans la boîte de dialogue objet. Vous trouverez la chaîne ClassType, insérez l'objet en tant que forme insérée, puis affichez les codes de champ. Le type de classe de l'objet suit le mot « EMBED » ou le mot « LINK ».
DisplayAsIcon	Facultatif	Variant	True pour afficher l'objet OLE en tant qu'icône. La valeur par défaut est False.
IconFileName	Facultatif	Variant	Fichier contenant l'icône à afficher.
IconIndex	Facultatif	Variant	Numéro d’index de l’icône dans IconFileName. L'ordre des icônes défini dans le fichier spécifié correspond à l'ordre d'affichage des icônes dans la boîte de dialogue Changer d'icône (menu Insertion, boîte de dialogue Insérer un objet), quand la case à cocher Afficher sous forme d'icône est activée. Dans l'index, la première icône du fichier porte le numéro 0 (zéro). Si une icône avec le numéro d’index donné n’existe pas dans IconFileName, l’icône avec le numéro d’index 1 (la deuxième icône du fichier) est utilisée. La valeur par défaut est 0 (zéro).
IconLabel	Facultatif	Variant	Légende à afficher sous l'icône.

Exemple

Cet exemple crée un document, puis insère un document Word incorporé avec du texte. Le document incorporé est ensuite converti en image Word.

Dim objEmbedded As Object 
 
Documents.Add 
 
Set objEmbedded = ActiveDocument.Shapes _ 
  .AddOLEObject(ClassType:= "Word.Document") 
objEmbedded.OLEFormat.Activate 
Selection.TypeText "Test" 
objEmbedded.OLEFormat.ConvertTo _ 
  ClassType:="Word.Picture"

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.