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 のサポートおよびフィードバックを参照してください。