設定每當更新 DDE 連結時執行的程序名稱。
命名空間: Microsoft.Office.Tools.Excel
組件: Microsoft.Office.Tools.Excel (在 microsoft.office.tools.excel.dll 中)
語法
'宣告 Public Overridable Sub SetLinkOnData ( _ Name As String, _ <OptionalAttribute> Procedure As Object _ )
'用途 Dim instance As Workbook Dim Name As String Dim Procedure As Object instance.SetLinkOnData(Name, Procedure)
參數
- Name
-
DDE/OLE 連結名稱,以 LinkSources 方法傳回。
- Procedure
-
更新連結時執行的程序名稱。這可以是 Microsoft Office Excel 4.0 巨集或 Visual Basic 程序。將此引數設為空字串 (""),表示更新連結時不應執行任何程序。
範例
下列程式碼範例取得目前活頁簿中所有 DDE 連結的集合,然後每當其中一個連結更新時,使用 SetLinkOnData 方法執行名為 UPDATE_MACRO 的巨集。
Private Sub WorkbookSetLinkOnData() Dim Links As Array = _ CType(Me.LinkSources(Excel.XlLink.xlOLELinks), _ Array) If Links IsNot Nothing Then Dim i As Integer For i = 1 To Links.Length Me.SetLinkOnData(Links(i), "UPDATE_MACR0") Next i Else MsgBox("The workbook contains no DDE/OLE links.") End If End Sub
全站熱搜
留言列表