Método Page.GetShapesLinkedToDataRow (Visio)
Devuelve una matriz con todas las formas de la página activa vinculadas a los datos de la fila de datos del conjunto de registros de datos especificado.
Nota:
Este objeto o miembro Visio solo se encuentra disponible para los usuarios con licencia de Visio Professional 2013.
Sintaxis
expresión. GetShapesLinkedToDataRow
( _DataRecordsetID_
, _DataRowID_
, _ShapeIDs()_
)
Expresión Expresión que devuelve un objeto Page .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
DataRecordsetID | Necesario | Long | Identificador del conjunto de registros de datos contenido en el documento activo. |
DataRowID | Necesario | Long | Identificador de una fila de datos del conjunto de registros de datos especificado en DataRecordsetID. |
ShapeIDs() | Necesario | Long | Parámetro de salida. Matriz de tipo Long que el método devolverá rellenada con los identificadores de formas de la página vinculada a la fila de datos especificada en DataRowID en el conjunto de registros de datos especificado en DataRecordsetID. |
Valor devuelto
Nothing
Comentarios
Para el parámetro ShapeIDs(), pase una matriz vacía y sin dimensiones de tipo Long. Si no hay ninguna forma en la página vinculada a la fila de datos especificada por DataRowID en el conjunto de registros de datos especificado por DataRecordsetID, GetShapesLinkedToDataRow devolverá una matriz vacía.
Para determinar los identificadores de todas las filas de datos de un conjunto de registros de datos, use el método DataRecordset.GetDataRowIDs . Tenga en cuenta que los identificadores de fila de datos no siempre se corresponden necesariamente con la posición lógica de las filas de datos del conjunto de registros de datos.
Ejemplo:
En la siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) se muestra cómo utilizar el método GetShapesLinkedToDataRow para determinar los identificadores de formas de las formas de la página vinculadas a los datos de la fila de datos cuyo número de identificador es 1 del último conjunto de registros de datos agregado a la colección DataRecordsets del documento actual. Se imprimen los identificadores de formas en la ventana Immediate (Inmediato).
Antes de ejecutar esta macro, use el método DataRecordsets.Add u otro medio para agregar al menos un conjunto de registros de datos a la colección DataRecordsets y asegúrese de que haya al menos una forma en la página activa vinculada a los datos de la fila de datos con el número de identificador 1 en el conjunto de registros de datos.
Public Sub GetShapesLinkedToDataRow_Example()
Dim vsoDataRecordset As Visio.DataRecordset
Dim intRecordsetCount As Integer
Dim alngShapeIDs() As Long
Dim lngDataRowID As Long
Dim intArrayCounter As Integer
intRecordsetCount = Visio.ActiveDocument.DataRecordsets.Count
Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intRecordsetCount)
lngDataRowID = 1
ActivePage.GetShapesLinkedToDataRow vsoDataRecordset.ID, lngDataRowID, alngShapeIDs
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.