Shape. BreakLinkToData メソッド (Visio)Shape.BreakLinkToData method (Visio)

図形と、指定されたデータ レコードセット内でその図形にリンクされているデータ行の間のリンクを解除します。Breaks the link between the shape and the data row to which it is linked in the specified data recordset.

注意

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

構文Syntax

expression. BreakLinkToData( _DataRecordsetID_ )

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

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
DataRecordsetIDDataRecordsetID 必須Required LongLong 図形がリンクされているデータ行を含むデータ レコードセットの ID です。The ID of the data recordset containing the data row the shape is linked to.

戻り値Return value

なしNothing

解説Remarks

図形とデータ行のリンクを解除しても、図形から図形データ (以前の一部のバージョンの Visio におけるカスタム プロパティ) は削除されず、図形と関連付けられたデータ グラフィックも削除されません。Breaking the link between an shape and a data row does not remove shape data (called custom properties in some previous versions of Visio) from the shape, nor does it remove any data graphics associated with the shape.

Example

次の Microsoft Visual Basic for Applications (VBA) マクロは、 Breaklinktodataメソッドを使用して、図形とデータレコードセット内のデータ行との間のリンクを解除する方法を示しています。The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the BreakLinkToData method to break the link between a shape and a data row in a data recordset.

このマクロを実行する前に、ページに図形を配置し、ドキュメントの**DataRecordsets** コレクションに少なくとも1つのデータレコードセットを追加します。さらに、任意のリンク方法を使用して、その図形を、コレクションに最後に追加したデータレコードセットのデータ行にリンクします。Before running this macro, place a shape on the page, add at least one data recordset to the DataRecordsets collection of the document, and use any linking method to link the shape to a data row in the data recordset you most recently added to the collection. または、Visio ユーザー インターフェイスで、[外部データ] ウィンドウから行を図形の上にドラッグして、図形をデータ行にリンクすることも可能です。Alternatively, you could link the shape to a data row by dragging the row from the External Data window onto the shape in the Visio user interface. その後、リンクされた図形を選択します。Then select the linked shape.

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

サポートとフィードバック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.