Método Shape.GetLinkedDataRow (Visio)
Obtiene el identificador de la fila de datos del conjunto de registros de datos especificado que está vinculada a la forma.
Nota:
Este objeto o miembro Visio solo se encuentra disponible para los usuarios con licencia de Visio Professional 2013.
Sintaxis
expresión. GetLinkedDataRow
( _DataRecordsetID_
)
Expresión Expresión que devuelve un objeto Shape .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
DataRecordsetID | Necesario | Long | Identificador del conjunto de registros de datos que contiene la fila vinculada. |
Valor devuelto
Long
Comentarios
El método GetLinkedDataRow devuelve un error si la forma no está vinculada a ninguna fila de datos.
Ejemplo:
La siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar el método GetLinkedDataRow para obtener el identificador de la fila de datos en el conjunto de registros de datos especificado vinculado a la forma.
Antes de ejecutar esta macro, agregue al menos un conjunto de registros de datos a la colección DataRecordsets del documento. La macro coloca una forma en la página, vincula la forma a una fila de datos del conjunto de registros de datos agregado más recientemente a la colección, obtiene el identificador de la fila y, a continuación, imprime el identificador de la fila en la ventana Inmediato.
Public Sub GetLinkedDataRow_Example()
Dim vsoDataRecordset As Visio.DataRecordset
Dim vsoShape As Visio.Shape
Dim intCount As Integer
Dim lngRowID As Long
intCount = Visio.ActiveDocument.DataRecordsets.Count
Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount)
Set vsoShape = ActivePage.DrawRectangle(2, 2, 4, 4)
vsoShape.LinkToData vsoDataRecordset.ID, 1, True
lngRowID = vsoShape.GetLinkedDataRow(vsoDataRecordset.ID)
Debug.Print lngRowID
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.