Excel) (Worksheet.PivotTableBeforeCommitChanges 事件

會在對樞紐分析表的 OLAP 資料來源認可變更之前發生。

語法

運算式。PivotTableBeforeCommitChanges (TargetPivotTable、 ValueChangeStart、 ValueChangeEnd、 Cancel)

運算式 代表 Worksheet 物件的變數。

參數

名稱 必要/選用 資料類型 描述
TargetPivotTable 必要 樞紐分析表 包含要認可之變更的樞紐分析表。
ValueChangeStart 必要 Long 相關聯 PivotTableChangeList 物件中第一個變更的索引。 索引是由 PivotTableChangeList 集合中 ValueChange 物件的 Order 屬性所指定。
ValueChangeEnd 必要 Long 相關聯的 PivotTableChangeList 物件中最後一個變更的索引。 索引是由 PivotTableChangeList 集合中 ValueChange 物件的 Order 屬性所指定。
Cancel 必要 布林值 False 事件發生時。 如果事件程序將此引數設定為 True,則不會對樞紐分析表的 OLAP 資料來源認可變更。

傳回值

Nothing

註解

PivotTableBeforeCommitChanges 事件會緊接在 Excel 對樞紐分析表的 OLAP 資料來源執行認可交易陳述式之前,以及使用者選擇儲存整個樞紐分析表的變更之後立即發生。

範例

下列程式碼範例會在變更認可至樞紐分析表的 OLAP 資料來源之前提示使用者。

Sub Worksheet_PivotTableBeforeCommitChanges(ByVal TargetPivotTable As PivotTable, _ 
 ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long, Cancel As Boolean) 
 
 Dim UserChoice As VbMsgBoxResult 
 
 UserChoice = MsgBox("Allow updates to be saved to: " + TargetPivotTable.Name + "?", vbYesNo) 
 If UserChoice = vbNo Then Cancel = True 
End Sub

支援和意見反應

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