Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Supprime la zone de fusion de catalogue de la page de composition spécifiée. Toutes les formes contenues dans la zone de fusion de catalogue demeurent en place sur la page, mais elles ne sont plus connectées à la source de données de fusion du catalogue.
Syntaxe
expression. RemoveCatalogMergeArea
expression Une variable qui représente uneForme d’objet.
Remarques
La suppression d'une zone de fusion de catalogue depuis une page de composition ne déconnecte pas la source de données de cette composition. Utilisez la propriété IsDataSourceConnected de l'objet Document pour déterminer si une source de données est connectée à une composition.
Utilisez la méthode AddCatalogMergeArea de la collection Shapes afin d'ajouter une zone de fusion de catalogue à une composition. Une page de composition ne peut contenir qu’une zone de fusion de catalogue.
Exemple
L'exemple suivant montre comment vérifier si une page de la composition spécifiée contient une zone de fusion de catalogue. Si c'est le cas, toutes les formes sont effacées de la zone de fusion de catalogue et supprimées, et la zone de fusion de catalogue est ensuite supprimée de la composition.
Sub DeleteCatalogMergeAreaAndAllShapesWithin()
Dim pgPage As Page
Dim mmLoop As Shape
Dim intCount As Integer
Dim strName As String
For Each pgPage In ThisDocument.Pages
For Each mmLoop In pgPage.Shapes
If mmLoop.Type = pbCatalogMergeArea Then
With mmLoop.CatalogMergeItems
For intCount = .Count To 1 Step -1
strName = mmLoop.CatalogMergeItems.Item(intCount).Name
.Item(intCount).RemoveFromCatalogMergeArea
pgPage.Shapes(strName).Delete
Next
End With
mmLoop.RemoveCatalogMergeArea
End If
Next mmLoop
Next pgPage
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.