Concatenar fecha, pasar de mm/dd a dd/mm
'Hola necesitaría si me pueden ayudar en lo siguiente, tengo la fecha en la columna "A:A" y de la siguiente forma 21.03.2012 (con puntos). Cuando aplico la macro que me reemplace el punto por la barra me lo hace, pero no me los deja todos como dd/mm/yyyy sino que, los días que son inferiores a 12 me los convierte de la siguiente forma mm/dd/yyyy, o sea, el 1er de Nov queda como 11/01/2012 como si fuera 11 de enero. Lo que hice fue utilizar la formula extraer y concatenar, pero hay algo que no me lo toma, me podrían ayudar?
For s = 1 To x
dia = Left(Range("D12").Value, 2)
mes = Mid(Range(Cells(11 + s, 13)).Value, 4, 2)
año = Right(Range(Cells(11 + s, 13)).Value, 4)
Valor = CDate(dia & "/" & mes & "/" & año)
Range(Cells(11 + s, 17)) = Valor
Next s