when u input the value use the date format something like this

.Fields(1).Value = Format(Text1.Text, "dd/MMM/yyyy")