Compartir a través de


Propiedad Shapes.Item (Visio)

Devuelve un elemento de una colección. La propiedad Item es la propiedad predeterminada de todas las colecciones. Solo lectura.

Sintaxis

expresión. Item (NameUIDOrIndex)

expresión Variable que representa un objeto Shapes.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
NameUIDOrIndex Obligatorio Variant Contiene el nombre, el identificador único o el índice del objeto que se va a recuperar.

Valor devuelto

Forma

Comentarios

Al recuperar objetos de una colección, puede omitir Item en la expresión puesto que es la propiedad predeterminada para todas las colecciones. Las instrucciones siguientes son equivalentes al ejemplo de sintaxis anterior:

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

Puede recuperar objetos de las colecciones Addons, Documents, Fonts, Hyperlinks, Layers, Masters, MasterShortcuts, OLEObjects, Pages, Shapes o Styles pasando el nombre del objeto como expresión de cadena en un valor de tipo Variant.

Si recupera un objeto Shape a partir del nombre, la propiedad Item busca en todas las formas del patrón o de la página que contienen la colección Shapes, además de hacerlo en la forma que la contiene. Por lo tanto, el objeto Shape devuelto por la propiedad Item puede ser una forma que no pertenece a la colección Shapes.

También puede pasar la cadena de identificador único de un objeto Master o Shape a la propiedad Item. Por ejemplo:

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

Si dicha cadena se pasa a la propiedad Item de una colección Shapes, se busca en todas las formas incluidas en la colección. No se busca en las formas de grupo dentro de la forma contenedora.

Para buscar en todas las formas de la colección, además de en las formas de los grupos y en la forma que contiene la colección, deberá incluir un asterisco (*) delante de la cadena de identificador único. Por ejemplo:

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

Para obtener más información sobre cómo pasar cadenas de identificador a la propiedad Item , vea el tema de la propiedad UniqueID en esta referencia.

Ejemplo:

Esta macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar la propiedad Item para obtener un objeto Page de la colección Pages del documento activo y todos los objetos Shape de la colección Shapes del objeto Page . Imprime los nombres de todas las formas de Page1 en la ventana Inmediato.

Antes de ejecutar esta macro, asegúrese de que el documento activo tiene formas en la página 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.