Probelma con el formato de fechas en macro

10/03/2005 - 11:57 por Josep | Informe spam

Hola a todos

Tengo una base de datos importada de otro programa que en un campo contiene
fechas con el siguiente formato dd.mm.aa
Como en lógico excel considera el campo como texto. Yo he intentado lo
siguiente:

Selecciona la columna
Columns("A:A").Select

Cambiarle el formato
Selection.NumberFormat = "dd/mm/yyyy"

Reemplazar los puntos por barras
Selection.Replace What:=".", Replacement:="/", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

Pero el problema es que me cambia siempre los dias por meses i los meses por
dias.

Como puedo hacer para que esto no me suceda?

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Josep

10/03/2005 - 13:17 | Informe spam

El problema solo surge cuando ejecuto la macro, ya que cuando realizo los
pasos manualmente en excel para crear la macro, funciona correctamente.

Responder a este mensaje

#2 KL

10/03/2005 - 13:19 | Informe spam

Josep,

Prueba la siguiente formula:

ÚTEVALUE(SUBSTITUTE(A1,".","-")) en ingles

o bien

þCHANUMERO(SUSTITUIR(A1;".";"-")) en castellano

o por codigo:

Sub Test()
Dim c As Range
Dim rng As Range
With ActiveSheet
Set rng = Intersect(.UsedRange, .Columns(1))
If rng Is Nothing Then Exit Sub
For Each c In rng
If c.Text Like "##.##.##" Then
With WorksheetFunction
c.Value = DateValue(.Substitute(c.Text, ".", "-"))
End With
End If
Next c
End With
End Sub

Saludos,
KL

"Josep" wrote in message
news:
Mostrar la cita

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida