Imprimir página | Cerrar ventana

Cambia día y mes en una fecha

Impreso de: Foro de Access y VBA
Categoría: Otros de Microsoft: Windows y Office
Nombre del foro: Excel
Descripción del foro: Foro de Excel y VBA de Excel
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=68575
Fecha de impresión: 21/Julio/2019 a las 11:04


Tema: Cambia día y mes en una fecha
Publicado por: Redneckman
Asunto: Cambia día y mes en una fecha
Fecha de publicación: 16/Abril/2011 a las 11:03
Hola, buenos días.

Tengo un problema en una Excel que me está dando muchos quebraderos de cabeza.
Tengo un UserForm normal y corriente en donde, a través de un TextBox le pido al usuario una fecha.
Luego a través de un Range("A1").Value=TextBox1.Value pego la fecha en la celda A1, que ya la tengo definida con formato Fecha dd/mm/aaaa.
El problema es que, en ocasiones, me cambia el día y el mes, es decir, si el usuario ha puesto 05/07/2011, me pega en la celda 07/05/2011.
¿Sabéis a qué puede deberse y como se podría solucionar?

Muchas gracias de antemano.



Respuestas:
Publicado por: Jordi-Albert
Fecha de publicación: 16/Abril/2011 a las 14:15
antes de nada mira la configuracion de tu excel y del sistema operativo en lo referente al idioma y los formatos (tanto de números como de fechas) que tienes.

Entiendo que aqui tienes el problema.

si no lo solucionas así, siempre puedes seleccionar el texto introducido en el formulario y pegarlo en la hoja con la instruccion "fecha()"


Publicado por: lbauluz
Fecha de publicación: 16/Abril/2011 a las 22:47
Eso me ha pasado alguna vez
La solución era tomar la fecha
Meterla en una variable tipo DATE
Poner esa variable la celda que quieras.

(En excel 2003)


-------------
Estoy en el módulo psiquiátrico de la prisión de Brieva


Publicado por: AnSanVal
Fecha de publicación: 17/Abril/2011 a las 12:33

Si utilizas un DTPicker (1),  no sólo sera más fácil de entrar la fecha, sino que te desaparecerán ese tipo de problemas. Visualmente ocupa lo mismo que un Text Box, salvo al desplegarlo para elegir una fecha.

 
 
(1) Para agregar el control al cuadro de herramientas:  Botón secundario sobre una zona vacia del Cuadro de herramientas (Editor VBA) > Controles adicionales... >  Marca Microsoft Date and Time Picker control 6.0. A partir de aquí podrás incluir un DTPicker en tus formularios, como cualquier otro control.
 
 
 

Editado :  Para poner la fecha en la celda.

Private Sub DTPicker1_Change()

  Range("A1").Value = UserForm1.DTPicker1.Value

End Sub



-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: Redneckman
Fecha de publicación: 25/Abril/2011 a las 07:46
Hola, buenos días.

Lo primero, disculpad por la tardanza en contestar.

AnSanVal, he mirado uno por uno los controles adicionales y no tengo el Microsoft Date and Time Picker control 6.0. Ignoro si me falta alguna actualización de Office o alguna referencia, aunque seguiré investigando porque es una solución muy elegante.
De momento, para salir del paso, la propuesta de Ibauluz me ha funcionado perfectamente y me ha resuelto el problema.

¡Muchísimas gracias a lo tres por las respuestas!
Enhorabuena por este magnífico foro.



Imprimir página | Cerrar ventana