Mensaje al cerrar

entra al editor de visiual basic
en el codigo de este libro escribe en el:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Respuesta = MsgBox("recuerde que debe llenar todas las
celdas", vbOKCancel + vbInformation)
If Respuesta = vbCancel Then Cancel = True
End Sub

Buenos días a todos, necesito ayuda para generar un
mensaje antes de cerrar un archivo. Un ejemplo sería que
cuando le de (x) cerrar, me saque un aviso
diciendo "Recuerde que debe llenar todas las celdas" y

que

al dar aceptar se salga y cuando "cancelar" se devuelva

al

documento.
Les agradezco si pueden colaborarme con esto
Gracias
.

No entiendo muy bien la utilidad que le vas a dar, porque sólo tendría
sentido la primera vez que abres el fichero, porque las siguientes ya
estarían todas las celdas rellenadas (salvo que borres las celdas al
abrirlo). En cualquier caso, podrías hacerlo mediante código, grabando en
thisworkbook y activando con el evnto beforeclose.
¿has mirado la posibilidad de utilizar la validación de datos del menu
Datos?




"ladita" escribió en el mensaje
news:2076c01c45932$91f361e0$
Buenos días a todos, necesito ayuda para generar un
mensaje antes de cerrar un archivo. Un ejemplo sería que
cuando le de (x) cerrar, me saque un aviso
diciendo "Recuerde que debe llenar todas las celdas" y que
al dar aceptar se salga y cuando "cancelar" se devuelva al
documento.
Les agradezco si pueden colaborarme con esto
Gracias