Fecha en inputbox Excel VBA
Una vez más tengo una pregunta...
Estoy solicitando por medio de un inputbox una fecha para hacer unos cálculos, luego la fecha la coloco en una celda...
Así es como solicito la fecha...
dim x
x = InputBox("Escribe la fecha de vencimiento")
Do While Not IsDate(x)
If x <> "" Then
p = MsgBox("Formato de fecha incorrecto. ", vbCritical)
x = InputBox("Escriba la fecha de vencimiento ")
Else
End
End If
Loop
Cómo pueden ver... Al utilizar IsDate la fecha toma ese formato... El problema es que yo NO puedo trabajar con el formato mes/día/año... Sino al contrario día/mes/año
como puedo hacer para que me acepte la fecha con este formato.. ¿dd/mm/aaaa
y poder validarlo para que me salga un mensaje de ErrOR en caso de que sea una fecha no válida?
Estoy solicitando por medio de un inputbox una fecha para hacer unos cálculos, luego la fecha la coloco en una celda...
Así es como solicito la fecha...
dim x
x = InputBox("Escribe la fecha de vencimiento")
Do While Not IsDate(x)
If x <> "" Then
p = MsgBox("Formato de fecha incorrecto. ", vbCritical)
x = InputBox("Escriba la fecha de vencimiento ")
Else
End
End If
Loop
Cómo pueden ver... Al utilizar IsDate la fecha toma ese formato... El problema es que yo NO puedo trabajar con el formato mes/día/año... Sino al contrario día/mes/año
como puedo hacer para que me acepte la fecha con este formato.. ¿dd/mm/aaaa
y poder validarlo para que me salga un mensaje de ErrOR en caso de que sea una fecha no válida?
1 respuesta
Respuesta de santiagomf
2