Selection.LinkToData メソッド (Visio)

選択された図形をデータ レコードセットの 1 つのデータ行にリンクします。

注:

この Visio オブジェクトまたはメンバーは Visio Professional 2013 のライセンス ユーザーのみが使用できます。

構文

expression. LinkToData( _DataRecordsetID_ , _DataRowID_ , _AutoApplyDataGraphics_ )

Selection オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
DataRecordsetID 必須 Long リンク先のデータを含むデータ レコードセットの ID。
DataRowID 必須 Long リンクする特定のデータ レコードを含むデータ レコードセットの行の ID です。
AutoApplyDataGraphics 省略可能 Boolean リンクされている図形に、データ グラフィックを自動的に適用するかどうかを指定します。 詳細については「備考」を参照してください。

戻り値

なし

解説

Selection.LinkToData メソッドの機能は、Shape オブジェクトの Shape.LinkToData メソッドの機能とほぼ同じですが、1 つのデータ行とリンクするのは、1 つの図形ではなく選択した図形です。

図形とデータ行のリンクが確立できない場合、Visio ではその図形はリンクされず、選択した次の図形が処理されます。 メソッドを実行した後、選択範囲のすべての図形が実際にデータ行にリンクされているかどうかを判断するには、選択範囲の各図形で Shape.GetLinkedDataRow メソッドを呼び出します。 このメソッドが失敗した場合、その図形はデータ行にリンクされていません。 Visio は通常、図形が既にデータにリンクされていて、データ レコードセットの link-replacement-behavior 設定でリンクを置き換えないことを指定しない限り、行を図形にリンクするのに成功します。

AutoApplyDataGraphics パラメーターとして True を渡した場合、このメソッドを呼び出す前にデータ グラフィックが適用されていた図形に、既存のデータ グラフィックが再適用されます。 データ グラフィックが適用されていなかった図形には、現在の図面の他の図形に最後に適用されたデータ グラフィックが適用されます。

次の Microsoft Visual Basic for Applications (VBA) マクロは、LinkToData メソッドを使用して、選択した図形をデータ行にリンクする方法を示します。

このマクロを実行する前に、ページにいくつかの図形を配置し、少なくとも 1 つのデータ レコードセットをドキュメントの DataRecordsets コレクションに追加します。 マクロは、そのコレクションの最後に追加されたデータ レコードセットの ID を使用します。 選択した図形をデータ レコードセットの最初の行のデータにリンクします。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。