Propriété FillFormat.PresetTexture (Publisher)

Article
04/07/2023

Renvoie une constante MsoPresetTexture qui représente la texture prédéfinie pour le remplissage spécifié. En lecture seule.

Syntaxe

expression. PresetTexture

Expression Variable qui représente un objet FillFormat .

Valeur renvoyée

MsoPresetTexture

Remarques

La valeur de la propriété PresetTexture peut être une des constantes MsoPresetTexture déclarées dans la bibliothèque de type Microsoft Office.

Utilisez la méthode PresetTextured pour spécifier la texture prédéfinie du remplissage.

Exemple

Cet exemple ajoute un rectangle sur la première page de la composition active et définit sa texture préréglée pour qu'elle corresponde à celle de la première forme de la page. Pour que cet exemple fonctionne, la première forme doit posséder un remplissage avec une texture préréglée.

Sub SetTexture() 
 Dim texture As MsoPresetTexture 
 With ActiveDocument.Pages(1).Shapes 
 texture = .Item(1).Fill.PresetTexture 
 With .AddShape(Type:=msoShapeRectangle, Left:=250, Top:=72, _ 
 Width:=40, Height:=80) 
 .Fill.PresetTextured PresetTexture:=texture 
 End With 
 End With 
End Sub

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.

Partager via