Método Selection.BreakLinkToData (Visio)

Rompe los vínculos entre todas las formas de la selección y las filas 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. BreakLinkToData( _DataRecordsetID_ )

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

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
DataRecordsetID	Necesario	Long	Id. del conjunto de registros de datos con las filas de datos con las que se van a romper los vínculos.

Valor devuelto

Nothing

Comentarios

Si Microsoft Visio no puede romper el vínculo entre una forma de la selección y la fila de datos o si no existe el vínculo, Visio omite esa forma y pasa a la siguiente forma de la selección. Después de ejecutar el método , para determinar si las formas de la selección siguen vinculadas a una fila de datos, llame al método Shape.GetLinkedDataRow en cada forma de la selección. Si se produce un error en el método GetLinkedDataRow para cualquier forma, indica que la forma ya no está vinculada a la fila de datos o que nunca se vinculó a la fila de datos.

Observe que si se rompen los vínculos entre las formas y los datos, no se eliminan los datos de formas (denominadas propiedades personalizadas en algunas versiones previas de Visio) de las formas, ni se quitan los gráficos de datos asociados a éstas.

Ejemplo:

La siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar el método BreakLinkToData para interrumpir todos los vínculos entre las formas de una selección y las filas de datos de un conjunto de registros de datos.

Antes de ejecutar esta macro, coloque varias formas en la página, agregue al menos un conjunto de registros de datos a la colección DataRecordsets del documento y use cualquier método de vinculación para vincular varias formas a una o varias filas de datos del conjunto de registros de datos que agregó recientemente a la colección.

Public Sub BreakLinkToData_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoSelection As Visio.Selection 
    Dim intCount As Integer 
        
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    ActiveWindow.DeselectAll 
    ActiveWindow.SelectAll 
     
    Set vsoSelection = ActiveWindow.Selection 
    Call vsoSelection.BreakLinkToData(vsoDataRecordset.ID) 
     
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.