Marco para solo ingresar fechas mayores de edad para poder trabajar
Buenas tardes, quisiera saber si se puede realizar una macro para poder ingresar fechas mayores de edad y edad minima para poder trabajar que este me lance un mensaje diciendo cuando es MUY MAYOR para trabajar y que me lance un mensaje cuando ES MUY JOVEN PARA TRABAJAR
1 respuesta
Respuesta de Aneudys Martinez
en una celda comun usa la function sifecha seria asi
=sifecha (celda fecha de nac,celda de fecha de hoy,"y")
=sifecha(a1,a2,"y") en el caso de
Fecha de nsc. Este en la celda a1
Fecha de hoy este en la celda a2
Y en a3 estaría la fórmula
Luego en el evento change de la hoja
Seria así
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("a3") < "18" Then
MsgBox " es menor de edad "
End If
End Subestos es en el caso de menor de edad
ya para los muy adulto seria
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("a3") > "70" Then
MsgBox " es mayor de edad "
End If
End Suble puse 70 año pero tu elijiras el que quieras
Si te silve no ovides valorar para cerrar la pregunta
