Dim fechaSinFormato as String
Dim fechaFormateada as String
 
fechaSinFormato = "29-06-2009"
fechaFormateada = Format(fechaSinFormato, "yyyy/mm/dd"")

Dim fechaSinFormato As String
Dim fechaDate As Date
 
fechaSinFormato = "29-06-2009"
fechaDate = CDate(fechaSinFormato)