Partager via

Création d’une galerie de blocs de construction personnalisée

  • Article

Une galerie de blocs de construction est une collection de blocs de construction de même type. Vous pouvez créer 32 types de collection de blocs de construction (à l'aide de l'énumération WdBuildingBlockTypes ). Chaque type correspond à une galerie. Word fournit certaines de ces galeries en tant que collections de blocs de construction intégrées, mais la plupart d’entre elles sont fournies afin que vous puissiez organiser vos propres blocs de construction.

Les galeries personnalisées offrent une plus grande flexibilité car elles permettent de créer des catégories dans chaque galerie et d’améliorer encore l’organisation de vos blocs de construction personnalisés.

Les objets utilisés dans cet exemple sont les suivants :

Échantillon

L'exemple suivant montre comment créer une galerie de blocs de construction contenant trois blocs.

Remarque

[!REMARQUE] Pour cet exemple, le document doit contenir trois paragraphes au minimum.

Sub CreateBuildingBlockGallery() 
 Dim objTemplate As Template 
 Dim conType As WdBuildingBlockTypes 
 Dim objRange As Range 
 
 Set objTemplate = ActiveDocument.AttachedTemplate 
 conType = wdTypeCustom1 
 
 Set objRange = ActiveDocument.Paragraphs(1).Range 
 objTemplate.BuildingBlockEntries.Add _ 
 "Heading 1", conType, "Main Headings", objRange 
 
 Set objRange = ActiveDocument.Paragraphs(2).Range 
 objTemplate.BuildingBlockEntries.Add _ 
 "Heading 2", conType, "Secondary Headings", objRange 
 
 Set objRange = ActiveDocument.Paragraphs(3).Range 
 objTemplate.BuildingBlockEntries.Add _ 
 "Heading 3", conType, "Tertiary Headings", objRange 
End Sub

Voir aussi

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.