Propriété Plates.Count (Publisher)
Renvoie une valeur Long qui représente le nombre d’éléments dans la collection spécifiée.
Syntaxe
expression. Compter
Expression Variable qui représente un objet Plates .
Exemple
Cet exemple affiche le nombre de pages du document actif.
Sub CountNumberOfPages()
MsgBox "Your publication contains " & _
ActiveDocument.Pages.Count & " page(s)."
End Sub
Cet exemple affiche le nombre de formes du document actif.
Sub CountNumberOfShapes()
Dim intShapes As Integer
Dim pg As Page
For Each pg In ActiveDocument.Pages
intShapes = intShapes + pg.Shapes.Count
Next
MsgBox "Your publication contains " & intShapes & " shape(s)."
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.