Evento Worksheet.PivotTableBeforeCommitChanges (Excel)
Se produce antes de confirmar los cambios en el origen de datos OLAP de una tabla dinámica.
Sintaxis
expresión. PivotTableBeforeCommitChanges (TargetPivotTable, ValueChangeStart, ValueChangeEnd, Cancel)
Expresión Variable que representa un objeto Worksheet .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| TargetPivotTable | Obligatorio | Tabla dinámica | La tabla dinámica que contiene los cambios para confirmar. |
| ValueChangeStart | Necesario | Long | Índice del primer cambio en el objeto PivotTableChangeList asociado. El índice se especifica mediante la propiedad Order del objeto ValueChange de la colección PivotTableChangeList . |
| ValueChangeEnd | Necesario | Long | Índice del último cambio en el objeto PivotTableChangeList asociado. El índice es especificado por la propiedad Order del objeto ValueChange en la colección PivotTableChangeList. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento del evento establece este argumento en True, los cambios no se confirman en el origen de datos OLAP de la tabla dinámica. |
Valor devuelto
Nothing
Comentarios
El evento PivotTableBeforeCommitChanges se produce inmediatamente antes de que Excel ejecute una instrucción COMMIT TRANSACTION en el origen de datos OLAP de la tabla dinámica e inmediatamente después de que el usuario haya elegido guardar los cambios para toda la tabla dinámica.
Ejemplo:
En el ejemplo de código siguiente se solicita al usuario antes de que se confirmen los cambios en el origen de datos OLAP de la tabla dinámica.
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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.