Textbox con fecha

[salvador]

Felices Fiestas a todos los foristas.....,
..Para evitar que el valor de un textbox sea nulo o una fecha falsa,he introducido el siguiente codigo en el evento exit del textbox:

Private Sub...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Para que Exit no se efectivice y quedes tomando el foco, usa CANCEL = TRUE, despues de cada Then

 

[galileogali]

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Hoja1.[a1] = TextBox1.Text
On Error Resume Next
Err.Clear
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[salvador]

Buenas tardes Profe, en primer lugar gracias por la rapidez de su respuesta.
He de decirle que he probado el codigo y no me funciona.... Las fechas que yo introduzco como dd-mm , el ordenador las...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Adrian]

Hola, mi aporte en el tema.

Salu2.xls

 

[salvador]

HOLA ADRIAN:
Perdon por si no me he explicado correctamente... lo que yo pretendo es que en un textbox,se introduce la fecha en formato dd-mm, y el programa lo pasa a la celda con el mismo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Adrian]

Hola!
Examina el adjunto.

 

[salvador]

Hola denuevo Adrian:
Me ha parecido muy interesante tu propuesta para evitar errores,ahora la pregunta es.....¿ Como consigo incorporar este control (DTPic1ker) al cuadro de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jairo gamarra fontalvo]

Microsoft Date and Time Picker Control 6.0 (SP4).
Tambien puedes usar el: Control de Calendario

 

[galileogali]

A ver esto....
podria ampliarse/complicarse aceptando fechas de la forma dd-mm-aaaa y no solo las de dd/mm/aaaa, pero pienso que "no es mucho pedirle al usuario un poco de respeto" (jejeje)

 

[salvador]

Hola amigos:
Gracias a todos por vuestra colaboracion.
Creo que me voy a decidir por algo que encontre en el foro hace tiempo ( no recuerdo quien fue su autor ),y que ahora cuelgo para ver si a...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Jom]

Adrian excelente tu ejemplo, solo una consulta cuando lo abro siempre sale por defecto la fecha del 31/12/2008 y tengo que abrir el calendario y buscar la del dia de hoy, se puede hacer que tome...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Jom]

Adrian excelente tu ejemplo, solo una consulta cuando lo abro siempre sale por defecto la fecha del 31/12/2008 y tengo que abrir el calendario y buscar la del dia de hoy, se puede hacer que tome...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jairo gamarra fontalvo]

Podria probrar en el objeto que contiene el DTPicker esto.

Private Sub UserForm_Initialize()
DTPicker1.Value = Date
End Sub

 

[Jom]

Gracias Jairo, funciona en forma correcta. :D