線上學習
About Us

線上文檔

首頁 >>線上學習 >>線上文檔

第23章:通過VBA程式操縱Excel伺服器(二)

23.2.5 修改表單

方法

exec(<回寫公式名稱列表>)

執行指定的一條或多條回寫公式

示例

在示例資料庫中有如下範本,列舉所有客戶的資訊。

 

 

 

 

 

 

 

 

 

 

 

 

 

 

在這個範本上定義了一條回寫公式,把表格中的客戶資訊更新到客戶登記表中去。通常情況下,回寫公式只是在保存的時候才執行,但是我們可以寫一段VBA代碼,讓它在點擊【修改客戶資訊】按鈕後執行。

 

1

Private Sub cmdUpd_Click()

2

    Dim oAdd As Object

3

    oAdd = Application.COMAddIns("ESClient.Connect").Object

4

    If oAdd.exec("更新客戶資訊") = True Then

5

        MsgBox "客戶資訊已更新"

6

    End If

7

    oAdd = Nothing

8

End Sub