Formato Fechas

Rodrigo Barrere Brezina escribió:

Gracias a todos por los comentarios pero necesito que este grabado en una
macro, por eso inserte parte del codigo que utilizo pero que no me da
resultado. Alguna idea para hcerlo desde una macro??
Gracias desde ya.
Rodrigo Barrere Brezina
Dpto. Sistemas - Aguas del Valle S.A.
Tel: 430003 - int 233
VB 2005

Hola Rodrigo :-)

Prueba a ver esta macro:

Sub Formato_Fecha()

[B1:B10].TextToColumns _
DataType:=xlDelimited, _
FieldInfo:=Array(1, 4)
[B1:B10].NumberFormat = "dd/mm/yy"

End Sub

Si te lanza error dinos lo que marca el error :-)

Nos comentas ok? :-)

Saludos
Monica




¡Un SAludo! :-)

www.fermu.com
www.zorval.es

Gracias Monica , funciono perfecto!!!
;-)


Rodrigo Barrere Brezina
Dpto. Sistemas - Aguas del Valle S.A.
Tel: 430003 - int 233
VB 2005

S.F.del V. de Catamarca - ARGENTINA
"Tux" escribió en el mensaje
news:

Rodrigo Barrere Brezina escribió:
> Gracias a todos por los comentarios pero necesito que este grabado en

una

> macro, por eso inserte parte del codigo que utilizo pero que no me da
> resultado. Alguna idea para hcerlo desde una macro??
> Gracias desde ya.
> Rodrigo Barrere Brezina
> Dpto. Sistemas - Aguas del Valle S.A.
> Tel: 430003 - int 233
> VB 2005
>
Hola Rodrigo :-)

Prueba a ver esta macro:

Sub Formato_Fecha()

[B1:B10].TextToColumns _
DataType:=xlDelimited, _
FieldInfo:=Array(1, 4)
[B1:B10].NumberFormat = "dd/mm/yy"

End Sub

Si te lanza error dinos lo que marca el error :-)

Nos comentas ok? :-)

Saludos
Monica




¡Un SAludo! :-)

www.fermu.com
www.zorval.es

Ahora me surgen tres problemas/dilemas:
Primero: la macro la genero en una pc con Office 2000 Professional y cuando
la quiero ejecutar en otra pc con Office 2003 no me permite aunque baje la
seguridad de las macros a lo mas bajo, como puedo hacer un certificado para
que sea considerada "segura".
Segundo:Como puedo hacer que esta macro sea general para cualquier columna o
para las columnas que estan seleccionadas?
Tercero y ultimo: como puedo hacer que sea ejecutable desde un icono en la
barra de herramientas??
Gracias desde ya por sus respuestas.

Rodrigo Barrere Brezina
Dpto. Sistemas - Aguas del Valle S.A.
Tel: 430003 - int 233
VB 2005
S.F.del V. de Catamarca - ARGENTINA

"Rodrigo Barrere Brezina"
escribió en el mensaje news:%

Gracias Monica , funciono perfecto!!!
;-)


Rodrigo Barrere Brezina
Dpto. Sistemas - Aguas del Valle S.A.
Tel: 430003 - int 233
VB 2005

S.F.del V. de Catamarca - ARGENTINA
"Tux" escribió en el mensaje
news:
> Rodrigo Barrere Brezina escribió:
> > Gracias a todos por los comentarios pero necesito que este grabado en
una
> > macro, por eso inserte parte del codigo que utilizo pero que no me da
> > resultado. Alguna idea para hcerlo desde una macro??
> > Gracias desde ya.
> > Rodrigo Barrere Brezina
> > Dpto. Sistemas - Aguas del Valle S.A.
> > Tel: 430003 - int 233
> > VB 2005
> >
> Hola Rodrigo :-)
>
> Prueba a ver esta macro:
>
> Sub Formato_Fecha()
>
> [B1:B10].TextToColumns _
> DataType:=xlDelimited, _
> FieldInfo:=Array(1, 4)
> [B1:B10].NumberFormat = "dd/mm/yy"
>
> End Sub
>
> Si te lanza error dinos lo que marca el error :-)
>
> Nos comentas ok? :-)
>
> Saludos
> Monica
>
>
>
>
> ¡Un SAludo! :-)
>
> www.fermu.com
> www.zorval.es

Rodrigo Barrere Brezina escribió:

Ahora me surgen tres problemas/dilemas:
Primero: la macro la genero en una pc con Office 2000 Professional y cuando
la quiero ejecutar en otra pc con Office 2003 no me permite aunque baje la
seguridad de las macros a lo mas bajo, como puedo hacer un certificado para
que sea considerada "segura".
Segundo:Como puedo hacer que esta macro sea general para cualquier columna o
para las columnas que estan seleccionadas?
Tercero y ultimo: como puedo hacer que sea ejecutable desde un icono en la
barra de herramientas??
Gracias desde ya por sus respuestas.

Rodrigo Barrere Brezina
Dpto. Sistemas - Aguas del Valle S.A.
Tel: 430003 - int 233
VB 2005
S.F.del V. de Catamarca - ARGENTINA

Hola Rodrigo :-)

Bien para tu primera consulta mirate estos articulos de Microsoft:

http://support.microsoft.com/kb/827116/es
http://support.microsoft.com/kb/820738/es
http://support.microsoft.com/kb/217221/es
http://office.microsoft.com/en-us/o...71033.aspx

El primer enlace que te he pasado aunque sea para powerpoint es valido
para excel ok? (por el tema de que no puedes ejecutar macro).

Bien para la segunda cuestion:

Esta macro una vez hayas seleccionado las columnas a convertir, puedes
darle a ejecutar macro, << Con Cuidado, de que la celda 1 de la columna
IV este siempre vacia, osease que IV1, no tenga nada en ella, ok? >>

'-

Sub Fecha_Texto_a_Fecha()

Application.ScreenUpdating = False

Range("IV1").Copy

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd
Application.CutCopyMode = False
Selection.NumberFormat = "dd-mm-yy"
Range("E12").Select

Application.ScreenUpdating = True

End Sub

'

Y para el tercer punto pues una manera facil de poner un boton para esta
macro es la siguiente:

Menú Herramientas > personalizar > pestaña comandos > en la pantalla
derecha donde dice Categorias Buscas ahi Macros, y te saldran en la
derecha dos botones pues coges click en el de cara sonriente (Smail) y
arrastralo a la barra de herramientas o donde quieras situarlo y una vez
situado click derecho del raton y ahi tienes para cambiarle la imagen y
asignarle la macro en cuestion. (tambien se puede crear mediante codigo )

Comentanos ok? :-)

Saludos
Monica

¡Un SAludo! :-)

www.fermu.com
www.zorval.es