Resultado formula udf de ingles a español

[FelipeLopez1121]

Hola estimados

Bueno he creado una formula que entre otras formulas, usa la formula Texto.

El problema es que el resultado que me arroja esta sale en ingles.

Function MesExacto(FechaReferencia)

MesExacto = Application.Text(FechaReferencia, "MMM")

End Function

Aqui por ejemplo pongo cualquier numero (por ejemplo 50030), y me arroja las 3 primeras letras del mes PERO EN INGLES (En este caso, arroja "Dec"). Yo quisiera que salga en español (En este caso que arroje "Dic"), de allí mi duda.

Espero puedan ayudarme

Saludos

[FelipeLopez1121]

-

[Héctor Miguel]

no creo necesaria una UDF para hacer lo que ya hacen las funciones integradas del excel (???), en todo caso, cambia por algo +/- así:

Function MesEnTuIdioma(fecha_ref As Date) As String

  MesEnTuIdioma = Format(fecha_ref, "mmm")

End Function[/CODE]

saludos,

hector.

[FelipeLopez1121]

no creo necesaria una UDF para hacer lo que ya hacen las funciones integradas del excel (???), en todo caso, cambia por algo +/- así:

Function MesEnTuIdioma(fecha_ref As Date) As String

  MesEnTuIdioma = Format(fecha_ref, "mmm")

End Function[/CODE]

saludos,

hector.

Hola Héctor

Bueno revise tu aporte y si me sirvió.

Sin embargo, me queda una duda. La duda es como meter la función Si como formula en macro. Yo he hecho algo así pero no me funciona:

[b][color=#0000ff]Function Si(Referencia)

Si = Application.If(Referencia > "0", "1", "2")

End Function

[/color][/b]

[color=#000000][b]Ojala pueda ayudarme con esto[/b][/color]

[b][color=#0000ff][/color][/b]

[color=#000000]PD: Se que no seria necesario una UDF si es que uso las formulas individualmente, pero lo que sucede es que he creado una UDF que combina varias formulas, de alli mi consulta.

Saludos[/color]

[Max2005]

Hola FelipeLopez 1121,

en VBA la función si se expresa :

iif(+ la condición que necesitas)[/CODE]

Mucha Suerte

Saludos !!!

[FelipeLopez1121]

no creo necesaria una UDF para hacer lo que ya hacen las funciones integradas del excel (???), en todo caso, cambia por algo +/- así:

Function MesEnTuIdioma(fecha_ref As Date) As String

  MesEnTuIdioma = Format(fecha_ref, "mmm")

End Function[/CODE]

saludos,

hector.

Perdon Hector (y a los demás que vean este tema), mi tema aun no esta resuelto

Lo que sucede es que pensé que se había solucionado el problema, pero cuando probé con los siguientes ejemplos:

[b][color=#0000ff] Dic2013

Ene2014

Abr2014 [/color][/b]

No me corre la formula (Este es el objetivo de mi pregunta, osea que corra en este caso)

Pero si me corre si pongo:

[b][color=#0000ff] Dec2013

Jan2014

Apr2014 [/color][/b]

Y lo mas curioso es que cuando uso la formula (FechaNumero) en la hoja de calculo, me funcionan para los primeros 3 pero no para los otros 3 (osea al revés de si uso macro)

Espero puedan ayudarme

Saludos