Método Page.UniqueIDsToShapeIDs (Visio)

Devuelve una matriz de identificadores de formas de formas en la página, según lo especificado por sus identificadores únicos.

Nota:

Este objeto o miembro Visio solo se encuentra disponible para los usuarios con licencia de Visio Professional 2013.

Sintaxis

expresión. UniqueIDsToShapeIDs( _GUIDs()_ , _ShapeIDs()_ )

Expresión Expresión que devuelve un objeto Page .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
GUID()	Obligatorio	String	Matriz de identificadores únicos de tipo String de las formas de la página.
ShapeIDs()	Necesario	Long	Parámetro de salida. Matriz vacía que el método completa con identificadores de formas de tipo Long correspondientes a las formas especificadas en GUIDs().

Valor devuelto

Nothing

Comentarios

Microsoft Visio identifica las formas mediante dos identificadores diferentes: identificadores de formas e identificadores únicos. Los identificadores de formas son numéricos e identifican de forma única las formas dentro del ámbito de una página de dibujo individual. No obstante, no son únicos dentro de un ámbito más amplio.

Los identificadores únicos son identificadores únicos globales (GUID). Son únicos dentro del ámbito de la aplicación.

Para convertir entre identificadores de forma e identificadores únicos, puede usar dos métodos del objeto Page , ShapeIDsToUniqueIDs y UniqueIDsToShapeIDs.

De forma predeterminada, una forma no tiene un identificador único. Una forma adquiere un identificador único solo si establece su propiedad Shape.UniqueID .

Si un objeto Shape tiene un identificador único, ninguna otra forma de cualquier otro documento tendrá el mismo identificador.

Ejemplo:

En la siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) se muestra cómo utilizar el método UniqueIDsToShapeIDs para determinar los identificadores de formas de las formas de la página que se pasan al método como identificadores únicos. Se realiza una iteración en todas las formas de la página de dibujo activa utilizando la propiedad UniqueID de cada forma para obtener los identificadores únicos de las formas. A continuación, pasa esos identificadores únicos al método UniqueIDsToShapeIDs para devolver los identificadores de forma de las formas. Se imprimen los identificadores únicos y los identificadores de formas en la ventana Immediate (Inmediato).

Ante de ejecutar la macro, abra un dibujo de Visio y coloque varias formas en la página de dibujo activa.

Public Sub UniqueIDsToShapeIDs_Example() 
 
    Dim vsoShape As Visio.Shape 
    Dim intArrayCounter As Integer 
    Dim intShapeCount As Integer 
     
    intShapeCount = ActivePage.Shapes.Count 
     
    ReDim astrUniqueIDs(intShapeCount - 1) As String 
    ReDim alngShapeIDs(intShapeCount - 1) As Long 
     
    intArrayCounter = 0 
     
    For Each vsoShape In ActivePage.Shapes         
        astrUniqueIDs(intArrayCounter) = vsoShape.UniqueID(1) 
        Debug.Print astrUniqueIDs(intArrayCounter) 
        intArrayCounter = intArrayCounter + 1 
    Next 
    
    ActivePage.UniqueIDsToShapeIDs astrUniqueIDs, alngShapeIDs 
     
    intArrayCounter = 0 
 
    For intArrayCounter = LBound(alngShapeIDs) To UBound(alngShapeIDs) 
        Debug.Print alngShapeIDs(intArrayCounter) 
    Next 
 
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.