Evento despues del aviso cerrar documento Excel

Lo que se suele hacer es crear un mensaje propio y ejecutar el código según la respuesta del usuario, algo como:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim intRespuesta As Integer
Cancel = True
intRespuesta = MsgBox("¿Desea guardar los cambios efectuados en '" & Me.Name, vbYesNoCancel)
If intRespuesta = vbYes Then
'Se seleccionó <Sí>
ElseIf intRespuesta = vbNo Then
'Se seleccionó <No>
Else
'Se seleccionó <Cancelar>
End If
End Sub

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Gema" escribió en el mensaje news:

Hola,

Antes de cerrar un documento excel sale un mensaje de aviso como el
siguiente:
¿Desea guardar los cambios efectuados en 'Nombre del Documento Excel'? y
acontinuación tres botones: Sí, No, Cancelar.


Antes de salir este mensaje ya se ha ejecutado el evento BeforeClose y he
puesto visible un boton desde ese evento. Pero si en el aviso anterior
Pulsan Cancelar, tengo que ocultar dicho boton... ¿Alguien sabe como
controlar mediante vb que botón (Sí, No o Cancelar.) a pulsado en el
mensaje anterior?




Muchas Gracias. Gema.