Validación de datos en macro
Solicito de su ayuda para un macro
Mi problema es que tengo este formulario los cuadros en negro son celdas que se deben de llenar, lo que necesito es que al guardar con el botón de "GUARDAR BD" me valide que esas casillas estén llenas y si están vacías me envié un mensaje de error.
Las casillas donde se introducen datos son:
L6, L8, L10, L13
P6, P8, P10, P11, P13
R6, R13 y Q10
1 Respuesta
Respuesta de Dante Amor
1
H o l a : Pon lo siguiente al inicio de tu macro:
Sub Guardar()
'Por.Dante Amor
celdas = Array("L6", "L8", "L10", "L13", _
"P6", "P8", "P10", "P11", "P13", _
"R6", "R13", "Q10")
For c = LBound(celdas) To UBound(celdas)
If Range(celdas(c)).Value = "" Then
MsgBox "Falta completar la celda: " & celdas(c), vbCritical
Range(celdas(c)).Select
Exit Sub
End If
Next
'
'Aquí debe continuar tu macro
'
'
End Sub
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
