I enter todays date into a sheet via a userform as follows:-

Sub FillForm()
Todaysdate = Format(date,"dd/mm/yyyy"

Me.IndateTb.value = Todaysdate
Sheets("Sheet1").Range("A1").Value = Me.IndateTb.Value
End sub
I have also formatted A1 as a date with the same format

However when I read back the value it always shows in the textbox as mm/dd/yyyy.

How can I stop this?
John Southern