Problema con fecha en Textbox de formulario

Wenas!!

Recientemente he retomado un proyecto que tenía parado desde hace
semanas y he logrado (con vuestra ayuda) ir superando todas las barreras
o dificultades que me iban surgiendo pero ahora mismo estoy atascado en
un escollo que no logro superar.

Tengo un userform con varios textbox, uno de ellos es para que aparezca
automaticamente la fecha de tal modo que el usuario no pueda editar la
fecha.

En el formulario tengo el siguiente código:

Private Sub Userform_Initialize()

Dim Fecha As Date
Sheets("Matriz").Activate
Fecha = Cells(2, 5)
TxtFecha.Value = Fecha

Donde TxtFecha es el textbox que contiene la fecha. Como veis lo único
que he conseguido es que al mostrarse el fomulario aparezca la fecha ya
que el textbox recoge el valor de una celda de otra hoja del libro donde
tengo la función =hoy(). El problema es que al pulsar un botón del
formulario para volcar los datos lo hace correctamente con todos excepto
con la fecha. Sinceramente yo no doy para mucho mas, ¿alguna idea?.

Muchas gracias.