Shape.BreakLinkToData メソッド (Visio)
図形と、指定されたデータ レコードセット内でその図形にリンクされているデータ行の間のリンクを解除します。
注:
この Visio オブジェクトまたはメンバーは Visio Professional 2013 のライセンス ユーザーのみが使用できます。
構文
式。 BreakLinkToData
( _DataRecordsetID_
)
式Shape オブジェクトを返す式。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
DataRecordsetID | 必須 | Long | 図形がリンクされているデータ行を含むデータ レコードセットの ID です。 |
戻り値
なし
解説
図形とデータ行のリンクを解除しても、図形から図形データ (以前の一部のバージョンの Visio におけるカスタム プロパティ) は削除されず、図形と関連付けられたデータ グラフィックも削除されません。
例
次の Microsoft Visual Basic for Applications (VBA) マクロは、BreakLinkToData メソッドを使用して、図形とデータ レコードセット内のデータ行の間のリンクを解除します。
このマクロを実行する前に、ページに図形を配置し、少なくとも 1 つのデータ レコードセットをドキュメントの DataRecordsets コレクションに追加し、任意のリンク メソッドを使用して、コレクションに最後に追加したデータ レコードセット内のデータ行に図形をリンクします。 または、Visio ユーザー インターフェイスで、[外部データ] ウィンドウから行を図形の上にドラッグして、図形をデータ行にリンクすることも可能です。 その後、リンクされた図形を選択します。
Public Sub BreakLinkToData_Example()
Dim vsoDataRecordset As Visio.DataRecordset
Dim vsoShape As Visio.Shape
Dim intCount As Integer
intCount = Visio.ActiveDocument.DataRecordsets.Count
Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount)
Set vsoShape = ActiveWindow.Selection.PrimaryItem
vsoShape.BreakLinkToData (vsoDataRecordset.ID)
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。