Worksheet.PivotTableBeforeCommitChanges 事件 (Excel)

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

語法

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

表達 代表 Worksheet 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
TargetPivotTable	必要	PivotTable	包含要認可之變更的樞紐分析表。
ValueChangeStart	必要	Long	相關聯 PivotTableChangeList 物件中第一個變更的索引。 索引是由PivotTableChangeList集合中ValueChange物件的Order屬性所指定。
ValueChangeEnd	必要	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 支援與意見反應。