Page. GetShapesLinkedToDataRow-Methode (Visio)Page.GetShapesLinkedToDataRow method (Visio)

Gibt ein Array aller Shapes auf dem aktiven Zeichenblatt zurück, die mit Daten in der angegebenen Datenzeile im angegebenen Datenrecordset verknüpft sind.Returns an array of all shapes on the active page linked to data in the specified data row in the specified data recordset.

Hinweis

Dieses Visio-Objekt oder dieses Visio-Mitglied ist nur für lizenzierte Benutzer von Visio Professional 2013 verfügbar.This Visio object or member is available only to licensed users of Visio Professional 2013.

SyntaxSyntax

Ausdruck.expression. GetShapesLinkedToDataRow( _DataRecordsetID_ , _DataRowID_ , _ShapeIDs()_ )

Ausdruck Ein Ausdruck, der ein Page -Objekt zurückgibt.expression An expression that returns a Page object.

ParameterParameters

NameName Erforderlich/OptionalRequired/Optional DatentypData type BeschreibungDescription
DataRecordsetIDDataRecordsetID ErforderlichRequired LongLong Die ID eines im aktuellen Dokument enthaltenen Datenrecordsets.The ID of a data recordset contained in the current document.
DataRowIDDataRowID ErforderlichRequired LongLong Die ID einer Datenzeile in dem Datenrecordset, das in DataRecordsetID angegeben wurde.The ID of a data row in the data recordset specified in DataRecordsetID.
ShapeIDs ()ShapeIDs() ErforderlichRequired LongLong Ausgabeparameter.Out parameter. Ein Array vom Typ Long , das die Methode mit den Shape-IDs von Shapes auf der Seite zurückgegeben wird, die mit der Datenzeile verknüpft ist, die in DataRow-ID im Datenrecordset angegeben ist, das in datarecordsetname angegeben ist.An array of type Long that the method will return filled with the shape IDs of shapes on the page linked to the data row specified in DataRowID in the data recordset specified in DataRecordsetID.

RückgabewertReturn value

NichtsNothing

BemerkungenRemarks

Übergeben Sie für den ShapeIDs ()-Parameter ein leeres, Dimensions Loses Array vom Typ Long.For the ShapeIDs() parameter, pass an empty, dimensionless array of type Long. Wenn keine Shapes auf der Seite vorhanden sind, die mit der durch DataRow-Wert angegebenen Datenzeile im Datenrecordset durch datarecordsetd angegeben ist, gibt GetShapesLinkedToDataRow ein leeres Array zurück.If there are no shapes on the page linked to the data row specified by DataRowID in the data recordset specified by DataRecordsetID, GetShapesLinkedToDataRow will return an empty array.

Verwenden Sie die DataRecordset . GetDataRowIDs -Methode, um die IDs aller Datenzeilen in einem Datenrecordset zu ermitteln.To determine the IDs of all the data rows in a data recordset, use the DataRecordset.GetDataRowIDs method. Die IDs der Datenzeilen entsprechen nicht immer der logischen Position der Datenzeilen im Datenrecordset.Note that data row IDs do not necessarily always correspond to the logical position of the data rows in the data recordset.

BeispielExample

Das folgende VBA-Makro (Microsoft Visual Basic for Applications) veranschaulicht, wie die GetShapesLinkedToDataRow -Methode verwendet wird, um die Shape-IDs der Shapes auf der Seite zu ermitteln, die mit Daten in der Datenzeile mit der ID Nummer 1 im Datenrecordset zuletzt verknüpft sind. zur DataRecordsets-Auflistung des aktuellen Dokuments hinzugefügt. ****The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the GetShapesLinkedToDataRow method to determine the shape IDs of the shapes on the page linked to data in the data row with ID number 1 in the data recordset most recently added to the DataRecordsets collection of the current document. Die Shape-IDs werden im Direktfenster gedruckt.It prints the shape IDs in the Immediate window.

Verwenden Sie vor dem Ausführen dieses Makros die DataRecordsets . Add -Methode oder eine andere Möglichkeit, der DataRecordsets- **** Auflistung mindestens ein Datenrecordset hinzuzufügen, und stellen Sie sicher, dass mindestens eine Form auf der aktiven Seite mit Daten in der Datenzeile mit der ID verknüpft ist. Nummer 1 im Datenrecordset.Before running this macro, use the DataRecordsets.Add method or another means to add at least one data recordset to the DataRecordsets collection, and make sure there is at least one shape on the active page linked to data in the data row with ID number 1 in the data recordset.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.