Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein Array aller Shapes auf dem aktiven Zeichenblatt zurück, die mit Daten in der angegebenen Datenzeile im angegebenen Datenrecordset verknüpft sind.
Hinweis
Dieses Visio-Objekt oder dieses Visio-Mitglied ist nur für lizenzierte Benutzer von Visio Professional 2013 verfügbar.
Syntax
Ausdruck.
GetShapesLinkedToDataRow( _DataRecordsetID_ , _DataRowID_ , _ShapeIDs()_ )
Ausdruck Ein Ausdruck, der ein Page-Objekt zurückgibt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| DataRecordsetID | Erforderlich | Long | Die ID eines im aktuellen Dokument enthaltenen Datenrecordsets. |
| DataRowID | Erforderlich | Long | Die ID einer Datenzeile in dem Datenrecordset, das in DataRecordsetID angegeben wurde. |
| ShapeIDs() | Erforderlich | Long | Ausgabeparameter. Ein Array vom Typ "Long ", das von der Methode zurückgegeben wird, gefüllt mit den Form-IDs von Formen auf der Seite, die mit der in DataRowID angegebenen Datenzeile in dem in DataRecordset angegebenen Datenrecordset verknüpft ist. |
Rückgabewert
Nichts
Bemerkungen
Übergeben Sie für den Parameter ShapeIDs() ein leeres Array ohne Dimensionen vom Typ Long. Wenn keine Shapes auf der Seite vorhanden sind, die mit der Datenzeile verknüpft ist, die durch DataRowID in dem von DataRecordetID angegebenen Datenrecordset verknüpft ist, gibt GetShapesLinkedToDataRow ein leeres Array zurück.
Verwenden Sie die DataRecordset.GetDataRowIDs-Methode , um die IDs aller Datenzeilen in einem Datenrecordset zu ermitteln. Beachten Sie, dass Datenzeilen-IDs nicht unbedingt immer der logischen Position der Datenzeilen im Datenrecordset entsprechen.
Beispiel
Das folgende Microsoft Visual Basic for Applications (VBA)-Makro zeigt, wie Sie die GetShapesLinkedToDataRow-Methode verwenden, um die Shape-IDs der Shapes auf der Seite zu ermitteln, die mit Daten in der Datenzeile verknüpft ist, wobei die ID-Nummer 1 im Datenrecordset zuletzt der DataRecordsets-Auflistung des aktuellen Dokuments hinzugefügt wurde. Es druckt die Form-IDs im Direktfenster.
Verwenden Sie vor dem Ausführen dieses Makros die DataRecordsets.Add-Methode oder eine andere Möglichkeit, der DataRecordsets-Auflistung mindestens einen Datenrecordset hinzuzufügen, und stellen Sie sicher, dass auf der aktiven Seite mindestens ein Shape vorhanden ist, das mit den Daten in der Datenzeile mit der ID-Nummer 1 im Datenrecordset verknüpft ist.
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 Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.