Visual Basic para Aplicaciones - Control Calendario MonthView1

Life is soft - evento anual de software empresarial
   
Vista:

Control Calendario MonthView1

Publicado por sitoriu (2 intervenciones) el 25/11/2011 11:03:00
Hola !!

Necesito de vuestra ayuda en un detalle que no logro afinar.

Vereis tengo un libro de excel 2007 habilitado para macros. En el mismo tengo una hoja con una factura en la que en una celda para introducir la fecha de la factura llamo al control de calendario pero soy incapaz de mostrar la fecha Actual cuando see muestra el formulario que contiene el control.

Ya se que la propiedad value la puedo ajustar al día en cuestión pero no es plan de modificarla cada vez.

El código que tengo en la hoja es:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim rngFechas As Range

Set rngFechas = Range("H16:I16")

If Union(Target, rngFechas).Address = rngFechas.Address Then Call abrir_calendario


End Sub

Llamo al procedimiento abrir_calendario almacenado en el Modulo 1:

Sub abrir_calendario()

Calendario_formulario.Show

MonthView1 = Date

End Sub


Donde ya le paso el valor que quiero que es que el control muestre el día correspondiente a la fecha de hoy (Date)

Una vez que se muestra el formulario Calendario_formulario veo el control del calendario MonthView1 pero no se muestra la fecha actual del sistema sino la que está puesta en la propiedad Value, la cuál, no puedo dejar en blanco.

¿Como?¿Que debo poner y donde?, para que al cargarse el formulario esté por defecto la fecha actual del sistema.

Muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

Control Calendario MonthView1

Publicado por JuanC juanc2942@gmail.com (431 intervenciones) el 25/11/2011 12:53:54
probá hacerlo cuando se inicia el formulario

UserForm_Initialize()

Saludos, desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Control Calendario MonthView1

Publicado por sitoriu (2 intervenciones) el 25/11/2011 14:36:49
Y ¿donde se supone que debo ponerla?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de JuanC

Control Calendario MonthView1

Publicado por JuanC juanc2942@gmail.com (431 intervenciones) el 25/11/2011 19:30:32
en el módulo del UserForm ...
Public Sub UserForm_Initialize()
MonthView1 = Date
End Sub

Saludos, desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar