Thank you I did read it, but I still do not understand to get it to work. Here are my code, I have tried tow ways, but no luck..
Private Sub Save_Click()
Dim LValue As String
LValue = Format(Date, "dd/mm/yyyy")
LValue = Format(DateSendOut, "dd/mm/yyyy")
Dialog.Box "Tape # : " &...