Worksheet.PivotTableBeforeCommitChanges 事件 (Excel)

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

語法

表達。PivotTableBeforeCommitChanges (TargetPivotTable、ValueChangeStart、ValueChangeEnd、Cancel)

詞 代表 工作表 物件的變數。

參數

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

傳回值

Nothing

註解

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

範例

下列程式碼範例會在將變更認可至樞紐分析表的 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 支援與意見反應。