James

Thanks a lot for your help, however I,m afraid I just dont have your skill
set and just cannot seem to get this fixed. Short of sending you my file, I
am afraid I have hot an impasse.

As I said, when I add you code the text box displays the date format
dd/mm/yyy I then fill in all the other fields and after the last field is
completed the curser jumps to the "ADD DATA" button that is on the spread
sheet. When I press this buttton the whole thing freezes and I have to use
ctl/alt/del to get out of it.

As soon as I take out your code, the "ADD DATA" button works again.

I have no idea


Cheers

John

"jamescox" wrote:


That's odd - your syntax for getting values into the worksheet seems to
be working fine for me. Are any of the other values getting written
back, or is it just TxtDate's value that isn't showing up?

One quick test is to just comment out all lines of the

Private Sub TxtDate_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)

and see if the values start getting written back.

Another test would be to put this line of code inside
TxtDate_BeforeUpdate and see if the value can be written back from
the

Activesheet.Cells(1, 1).Value = Me.TextBox1.Value

where you choose the values for Cells so that it's writing to a
location that won't mess up anything - (1,1) = A1 of course. Obviously,
this wouldn't be a permanent solution, but might help in trying to
understand what's going on.


--
jamescox
------------------------------------------------------------------------
jamescox's Profile: http://www.thecodecage.com/forumz/member.php?userid=449
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=114956