Macro en Excel

Hola necesito ayuda para crear una macro ya que deseo que esta al momento de ejecutarla pida la fecha completa para poderla pegar en diferentes hojas de un documento en excel.

Saludos Cordiales

Gracias...

Respuesta
1

Este código te puede servir

Sub ValidaFecha()
Dim Fecha As String
Do While Not IsDate(Fecha)
Fecha = InputBox("Ingrese Fecha dd/mm/aaaa", "", Format(Date, "dd/mm/yyyy"))
If Not IsDate(Fecha) Then
MsgBox "Debes colocar un formato de fecha valido"
End If
Loop
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas