No tengo idea sobre el año de publicación de la pregunta; Puede ser viejo ahora. Entonces, espero que mi respuesta sea más una referencia para futuras preguntas similares después de mi publicación.
No sé si alguien ya ha dado una respuesta similar a la que estoy a punto de dar, lo que podría resultar, creo, ser el más simple, más directo y más efectivo: si alguien ya lo ha hecho, me disculpo , pero no lo he visto. Aquí, mi respuesta usando CStr en lugar de TEXTO:
Asumiendo la celda A1 contiene una fecha, y usando el código VBA:
Dim strDate As String
'Convert to string the value contained in A1 (a date)
strDate = CStr([A1].Value)
A partir de entonces, puede manipularlo como cualquier cadena ordinaria utilizando funciones de cadena (MID, LEFT, RIGHT, LEN, CONCATENATE (&), etc.)