¿Cómo hacer que una celda en particular sea obligatoria de completar antes de cerrar el libro de trabajo?

Cuando compartes un libro de trabajo con otros usuarios para realizar una encuesta que requiere registro con nombre real, por ejemplo, cada usuario bajo investigación necesita ingresar su nombre en la celda B1. Pero a veces, algunos usuarios pueden cerrar el libro de trabajo después de la investigación sin ingresar sus nombres. En este artículo, te presento un código VBA para hacer que una celda en particular sea obligatoria antes de cerrar el libro de trabajo.

Hacer que una celda sea obligatoria de completar con VBA

Hacer que una celda sea obligatoria de completar con VBA

1. Habilita el libro de trabajo que contiene la celda obligatoria y presiona las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. En el panel Proyecto, haz doble clic en ThisWorkbook, y ve a seleccionar Libro de trabajo y BeforeClose desde la lista de la sección derecha, luego pega el siguiente código en el script. Ver captura de pantalla:

VBA: Hacer que una celda sea obligatoria

    If Cells(1, 2).Value = "" Then
        MsgBox "Cell B1 requires user input", vbInformation, "Kutools for Excel"
        Cancel = True
    End If

3. Luego guarda este código y cierra esta ventana emergente. Ahora, si la celda B1 está en blanco cuando cierras el libro de trabajo, aparecerá el siguiente cuadro de diálogo para recordarte que ingreses algo en B1. Ver captura de pantalla:

Consejo: Puedes cambiar la celda B1 a otras celdas que desees.