Partager via


Shapes.Item, propriété (Visio)

Renvoie un élément d’une collection. La propriété Item est la propriété par défaut de toutes les collections. En lecture seule.

Syntaxe

expression. Item (NameUIDOrIndex)

expression Variable qui représente un objet Shapes.

Paramètres

Nom Requis/Facultatif Type de données Description
NameUIDOrIndex Requis Variant Contient le nom, l'ID unique ou l'index de l'objet à récupérer.

Valeur renvoyée

Shape

Remarques

Lors de la récupération d’objets d’une collection, vous pouvez omettre Item de l’expression, car il représente la propriété par défaut de toutes les collections. Les instructions suivantes sont équivalentes à l’exemple de syntaxe ci-dessus :

objRet = object(index)  
objRet = object(stringExpression)

Vous pouvez récupérer un objet dans une collection Addons, Documents, Fonts, Hyperlinks, Layers, Masters, MasterShortcuts, OLEObjects, Pages, Shapes ou Styles en transmettant le nom de l’objet sous la forme d’une expression de chaîne dans un élément Variant.

Si vous récupérez un objet Shape par nom, la propriété Item recherche toutes les formes dans la forme de base contenante ou la page contenante de la collection Shapes, en plus de la forme contenante de la collection. Par conséquent, l’objet Shape renvoyé par la propriété Item peut être une forme qui ne figure pas dans la collection Shapes.

Vous pouvez également transmettre la chaîne de l’ID unique d’un objet Master ou Shape à la propriété Item. Par exemple :

objRet = vsoShapes.Item("{2287DC42-B167-11CE-88E9-0020AFDDD917}")

Si une telle chaîne est passée à la propriété Item d’une collection Shapes , toutes les formes contenues dans la collection font l’objet d’une recherche. Les formes des formes de groupe de la forme contenant ne font pas l’objet d’une recherche.

Pour rechercher toutes les formes de la collection, ainsi que celles incluses dans des groupes et dans la forme contenante de la collection, ajoutez un astérisque (*) comme préfixe à la chaîne de l'ID unique. Par exemple :

objRet = vsoShapes.Item("*{2287DC42-B167-11CE-88E9-0020AFDDD917}")

Pour plus d’informations sur le passage de chaînes d’ID à la propriété Item , consultez la rubrique relative à la propriété UniqueID dans cette référence.

Exemple

Cette macro Microsoft Visual Basic pour Applications (VBA) montre comment utiliser la propriété Item pour obtenir un objet Page à partir de la collection Pages du document actif et de tous les objets Shape de la collection Shapes de l’objet Page . Elle affiche le nom des formes de la Page1 dans la fenêtre Exécution.

Avant d'exécuter cette macro, assurez-vous que le document actif comporte des formes sur la Page1.

Public Sub Item_Example() 
  
    Dim intCounter As Integer 
    Dim intShapeCount As Integer 
    Dim vsoShapes As Visio.Shapes  
 
    Set vsoShapes = ActiveDocument.Pages.Item(1).Shapes  
 
    Debug.Print "Shape Name List For..." 
    Debug.Print "Document: "; ActiveDocument.Name  
    Debug.Print "Page: "; ActiveDocument.Pages.Item(1).Name  
 
    intShapeCount = vsoShapes.Count  
 
    If intShapeCount > 0 Then 
        For intCounter = 1 To intShapeCount  
            Debug.Print " "; vsoShapes.Item(intCounter).Name  
        Next intCounter  
    Else 
        Debug.Print " No Shapes On Page"  
    End If   
 
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.