jueves, diciembre 22, 2011

Ajuste automático de fecha en el calendario de Excel

Una de las notas más populares de este blog es Validar fechas en Excel con un calendario. Al presente registra más de 33 mil vistas y más de 130 comentarios.

Microsoft decidió retirar el control Calendario del paquete de Office 2010, pero muchos de mis lectores siguen usando versiones anteriores o han instalado el control independientemente.

Una de las consultas que recibo en relación a esa nota es cómo hacer para que el calendario se abra en la fecha corriente. Uno de los lectores puso en un comentario cómo hacerlo, pero por lo general los nuevos lectores no se detienen a leer todos los comentarios. Por ese motivo, mostraré en esta nota los pasos a dar para lograr ese efecto.

Creamos el userform con el control Calendario y ponemos los códigos de los eventos, tal como mostré en la nota mencionada.

Ahora agregamos un evento para establecer la fecha del calendario. En el editor de Vba seleccionamos el userform



apretamos F7 para abrir el módulo del control y agregamos este código al evento Activate del Userform

Private Sub UserForm_Activate()
    Calendar1.Value = Now
End Sub




Este evento hará que el calendario se abra siempre en la fecha del día corriente.

2 comentarios:

  1. Excelente. Muchas gracias por tu Excelencia MAESTRO.
    Estoy en total acuerdo en que fabriquemos nuestras propias herramientas.
    Sin embargo, me parece bueno nombrar las que ya existen.
    http://blogs.office.com/b/microsoft-excel/archive/2007/08/01/sam-radakovitz-on-date-pickers.aspx

    En este link, pueden ver un complemento muy fácil de implementar.

    ResponderBorrar
  2. NeoJohn,
    gracias por los conceptos. El complemento desarrollado por Sam Radakovitz y la forma de usarlo los mencioné en esta nota.

    ResponderBorrar

Nota: sólo los miembros de este blog pueden publicar comentarios.