共用方式為

Shape.LinkToData 方法 (Visio)

  • 發行項

會將圖形連結至資料錄集中的資料列。

注意事項

This Visio object or member is available only to licensed users of Visio Professional 2013.

語法

expression。 LinkToData( _DataRecordsetID_ , _RowID_ , _AutoApplyDataGraphics_ )

表達 會傳回 Shape 物件的運算式。

參數

名稱 必要/選用 資料類型 描述
DataRecordsetID 必要 Long 包含要連結之資料的資料記錄集識別碼。
RowID 必要 Long 資料錄集內資料列的識別碼，此資料錄集包含要連結的特定資料錄。
AutoApplyDataGraphics 選用 布林值 是否要自動將資料圖形套用到連結的圖形。 如需詳細資訊，請參閱＜備註＞。

傳回值

無

註解

Shape.LinkToData 方法的作用與 Selection 物件的相同方法 Selection.LinkToData 非常類似，不同的是它會將單一圖形 (而非一組選取的圖形) 連結至單一資料列。

如果您將 True 傳遞給 AutoApplyDataGraphics 參數，而且在呼叫方法之前圖形已套用資料圖形時，則 Microsoft Visio 會將現有資料圖形重新套用至圖形。 如果是先前沒有資料圖形的圖形，Visio 會套用目前文件中最近套用至任何其他圖形的資料圖形。

範例

下列 Microsoft Visual Basic for Applications (VBA) 巨集會示範如何使用 LinkToData 方法來將圖形連結至資料列。

執行此宏之前，請至少將一個資料記錄集新增至檔的 DataRecordsets 集合。 巨集會使用集合中最近新增之資料錄集的識別碼。 它會在頁面上繪製矩形圖形，並將它連結至記錄集第一列中的資料，同時將預設資料圖形套用至圖形。

Public Sub LinkToData_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 = ActivePage.DrawRectangle(2, 2, 5, 5) 
     
    vsoShape.LinkToData vsoDataRecordset.ID, 1, True 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。