Excel vba Problemas Con DTPicker

Hola Expertos

Me gustaría que el DTPicker Apareciera con la fecha Actual Del Sistema

Veo que en la Ventana de Propiedades, Hasta Abajo Tiene la Propiedad Value

Pero Solo Acepta : Fechas

Ejemplo: 16/oct/2014

No acepta "VB. Date", "Now"... Etc.

Ya Busque En Internet.. Pero no me Funciona Ningún Código..

Saludos!..

1 respuesta

Respuesta
1

Si Tienes el DTPicker en un formulario podría ser así:

Private Sub UserForm_Activate()
DTPicker1 = Date
End Sub

Si lo tienes como un controlactivex, podría ser así:

Private Sub Worksheet_Activate()
ActiveSheet.DTPicker1 = Date
End Sub

También, si lo tienes como un controlactivex, puedes poner en la propiedad LinkedCell una celda y en esa celda pones la función =Hoy().

Prueba y me comentas

Gracias !

me funciono el Primero..

Ya había probado con Userfom_Initialice()

DTPicker=Now

End sub()

pero no funcionaba..

Pero probé tu primera Solución y Quedo Bien

Gracias Dante!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas