En Excel 2003, ¿es posible ingresar fechas en una celda desde un calendario desplegable en lugar de ingresarlas manualmente?
En Excel 2003, ¿es posible ingresar fechas en una celda desde un calendario desplegable en lugar de ingresarlas manualmente?
Respuestas:
Utilice lo siguiente para Excel 2003.
Insertar & gt; Objeto, desplácese hacia abajo y haga clic en "Microsoft Calendar Control".
Haga clic derecho en la pestaña de la hoja de trabajo y ver el código.
Pega el siguiente código:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub 'Change this to your range of dates If Not Intersect(Target, Range("A1:A100")) Is Nothing Then Calendar1.Top = Target.Top + Target.Height Calendar1.Left = Target.Left + Target.Width / 2 - Calendar1.Width / 2 Calendar1.Visible = True Calendar1.Value = Now ElseIf Calendar1.Visible Then Calendar1.Visible = False End If End Sub Private Sub Calendar1_Click() ActiveCell.Value = (Calendar1.Value) ActiveCell.NumberFormat = "dd mmm yy" End Sub
Tenga en cuenta que en el código el rango para las fechas se establece como A1: A100, mantenga La sintaxis y cambiar esto para adaptarse.
Cerrar el editor de VB.
Salir del modo de diseño.
Cuando haces clic en a1: A100, obtienes un calendario que está predeterminado para hoy. fecha.
Haga clic en una fecha y se introduce en la celda activa.
Fuente Agregar un cuadro desplegable de calendario a Excel 2003
Ahi esta de varias maneras :
añadiendo campo de formulario con calendario desplegable Puede ser más cómodo, pero adecuado para un recuento de células limitado hecho manualmente.
agregar selector de fecha / hora universal puede ser un poco menos intuitivo de usar, pero no necesita ningún manejo especial adicional de celdas de fecha