Para KL

Hola Kl

Perdona que dirija este mensaje solo a ti, pero he estado buscando alguna
conversación que me ayude con un problema que tengo y esta fue la que mas se
acerco y fue expuesta por tu persona, te comento lo siguiente:

Tengo en un archivo de excel el siguiente esquema:

En la columna a de la celda a12 a la a40 se debe digitar una fecha que
corresponde a un pago, a partir de esa fecha debo de completar otros campos
que corresponden a esa fecha. por ejemplo lo que intento hacer es que si hay
una fecha en la celda a12 yo debo de completar las celdas
c12,d12,e12,f12,g12,i12,j12,k12,l12,n12 con diferentes datos , lo que deseo
hacer es que si hay una fecha digitada en el rango de la columna A y me falta
un dato por completar me envie un mensaje o no me deje continuar hasta que
complete todos los campos. La idea es que si yo digite la fecha se active la
validacion para los campos que corresponde la fecha.

Gracias por la ayuda que me puedas brindar!!!




Hola Mbaeijhapa,

Prueba lo siguiente:

Private Sub CommandButton1_Click()
With ActiveSheet
If Application.CountA(.Range("B5:B8")) <> _
.Range("B5:B8").Count Then
MsgBox "FALTA COMPLETAR DATOS"
Exit Sub
End If
End With
'Aqui va el resto de tu codigo
End Sub

Saludos,
KL