SoloCodigo

Prueba metiendo la fecha a mano y a la hora de poner la fecha dale formato normal
Suerte

Lo he conseguido pero al final haciendo la asignacion a mano de la siguiente forma:

ms.Col = 2
ms.Row = 0
De.rsdatos.MoveFirst
While (De.rsdatos.EOF = False)
ms.Row = ms.Row + 1
ms.Text = De.rsdatos!fecha
De.rsdatos.MoveNext
Wend

Creo vradok que como siempre se acaba antes a la antigua usanza.

Muchas gracias