LinkToData メソッド (Visio)Selection.LinkToData method (Visio)

選択された図形をデータ レコードセットの 1 つのデータ行にリンクします。Links a selection of shapes to a single data row in a data recordset.


この Visio オブジェクトまたはメンバーは Visio Professional 2013 のライセンス ユーザーのみが使用できます。This Visio object or member is available only to licensed users of Visio Professional 2013.


expression.expression. LinkToData( _DataRecordsetID_ , _DataRowID_ , _AutoApplyDataGraphics_ )

Selection オブジェクトを返すオブジェクト式を指定します。expression An expression that returns a Selection object.


名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
DataRecordsetIDDataRecordsetID 必須Required LongLong リンクするデータを含むデータレコードセットの ID です。The ID of the data recordset containing the data to link to.
DataRowIDDataRowID 必須Required LongLong リンクする特定のデータ レコードを含むデータ レコードセットの行の ID です。The ID of the row in the data recordset containing the particular data record to link to.
AutoApplyDataGraphicsAutoApplyDataGraphics 省略可能Optional BooleanBoolean リンクされている図形に、データ グラフィックを自動的に適用するかどうかを指定します。Whether to automatically apply a data graphic to the linked shapes. 詳細については「備考」を参照してください。See Remarks for more information.

戻り値Return value



Linktodataメソッドは、 shapeオブジェクトの場合と同じように機能します。 ただし、1つの図形ではなく、選択された図形を1つのデータ行にリンクします。The Selection.LinkToData method functions much like the same method of the Shape object, Shape.LinkToData, except that it links a selection of shapes, instead of a single shape, to a single data row.

図形とデータ行のリンクが確立できない場合、Visio ではその図形はリンクされず、選択した次の図形が処理されます。If Visio cannot establish a link between a shape and the data row, Visio skips that shape and goes on to the next shape in the selection. メソッドを実行した後、選択範囲内のすべての図形がデータ行に実際にリンクされているかどうかを確認するには、選択範囲内の各図形に対して、 GetLinkedDataRow メソッドを呼び出します。After you run the method, to determine if all shapes in the selection are actually linked to the data row, call the Shape.GetLinkedDataRow method on each shape in the selection. このメソッドが失敗した場合、その図形はデータ行にリンクされていません。If that method fails for any shape, it indicates that the shape is not linked to the data row. 通常、Visio は図形が既にデータにリンクされていて、リンクを置き換える必要があることを指定している場合を除いて、行を図形にリンクするのに成功します。Visio will usually succeed in linking a row to a shape unless the shape is already linked to data and the link-replacement-behavior setting for the data recordset specifies that the link should not be replaced.

AutoApplyDataGraphics パラメーターにTrueを指定すると、既存のデータグラフィックが、メソッドを呼び出す前に既にデータグラフィックを適用していた図形に再適用されます。If you pass True for the AutoApplyDataGraphics parameter, Visio re-applies the existing data graphic to shapes that already had data graphics applied before you called the method. データ グラフィックが適用されていなかった図形には、現在の図面の他の図形に最後に適用されたデータ グラフィックが適用されます。For shapes that previously had no data graphic, Visio applies the data graphic most recently applied to any other shape in the current document.


次の Microsoft Visual Basic for Applications (VBA) マクロは、 Linktodataメソッドを使用して、選択範囲内の図形をデータ行にリンクする方法を示しています。The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the LinkToData method to link the shapes in a selection to a data row.

このマクロを実行する前に、ページに複数の図形を配置して、少なくとも1つのデータレコードセットを図面の**DataRecordsets** コレクションに追加します。Before running this macro, place several shapes on the page and add at least one data recordset to the DataRecordsets collection of the document. マクロは、そのコレクションの最後に追加されたデータ レコードセットの ID を使用します。The macro uses the ID of the data recordset most recently added to the collection. 選択した図形をデータ レコードセットの最初の行のデータにリンクします。It links selected shapes to the data in the first row of the data recordset.

Public Sub LinkToData_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) 
    Set vsoSelection = ActiveWindow.Selection 
    vsoSelection.LinkToData vsoDataRecordset.ID, 1, True 
End Sub

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.