fechas VBA

15/05/2007 - 02:25 por Ivan | Informe spam
hola a todos,

aunque se que es un tema muy tratado en el foro (de hecho creo haber leído
unas cuantas conversaciones al respecto, sobre todo de y/o entre Hector
Miguel y KL, en incluso puede que yo mismo haya estado implicado en alguna),
he estado buscando y no acabo de aclararme con mi duda.

se trata de lo siguiente: he hecho una función para que me devuelva la fecha
en formato valido para VB < espero no equivocarme al pensar que es
'mm/dd/yy' >, para poder usar estas en diversos procesos (pej autofiltros)
sin tener que formatearla directamente cada vez, y SOBRE TODO para poder
usarla sin que importe la configuración regional del sistema del usuario.

en esto ultimo es donde tengo mis mayores dudas. En mi equipo tengo la
configuración (creo que) europea ['dd/mm/yyyy], y en un principio pensé que
con formatearla así Format(fecha, "mm/dd/yyyy") me valdría, y de hecho
parece valerme, pero

¿y si la configuración del sistema es p.ej: 'mm/dd/yyyy'? ¿que ocurriría con
el formateo?¿ lo invertiría, creyendo ponerlo bien, o directamente lo
reconoce y lo mantiene tal cual?

bueno, ante estas dudas, esta es la función, pero como solo la he probado en
mi configuración, en la que parece funcionar bien, no se hasta que punto
pueden surgir problemas en otras configuraciones, o si existen tros factores
a tener en cuenta, o una forma de simplificarlo

Function FechaVba(ByVal fecha As Date) As Date
Select Case Application.International(xlDateOrder)
Case 0: FechaVba = DateValue(fecha)
Case Else: FechaVba = Format(fecha, "mm/dd/yyyy")
End Select
End Function

lo dicho, si podéis echarme una mano o facilitarme un link 'esclarecedor',
os lo agradezco

un saludo y hasta pronto
Ivan

Preguntas similare

Leer las respuestas

#6 Ivan
16/05/2007 - 04:13 | Informe spam
hola Hector, muchas gracias otra vez

]... si la intencion es 'interactuar' con el usuario.<<





de nuevo, tienes razon, preo no lo puedo remediar, la curiosidad me
pierde.

un saludo y lo dicho, muchas gracias por todo

Ivan
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida