Evitar grabar si no se completan las celdas

[MIguel Alarco]

Conoce alguno del grupo como poner una sentencia en un archivo Excel,
en el cual, en un formulario deba llenarse obligatoriamente todos los campos,
y en caso se intente grabar y cerrar el archivo,
con alguna de las celdas vacías del formulario,
Evitar que se pueda grabar, y que,
aparezca una ventana indicando que si no se completa la información en las celdas del formulario, el archivo se cerrará sin ser grabado.

Gracias
Miguel

[yenay]

Si sabes de macros es usando el evento "Workbook_BeforeSave".

Si no sabes hazmelo saber y ya veremos como hacemos

[MIguel Alarco]

Gracias Yenay,
Me ha dado resultados con esta sentencia:


Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, ByRef Cancel As Boolean)

If Range("D6").Value = "" Then Cancel = True
If Range("D6").Value = "" Then MsgBox ("Antes de Grabar, debe primero llenar la celda D6 del formulario")

End Sub