sStr = ActiveCell.Value
v = Split(sStr,"/")
textbox1.value = v(lbound(v))
textbox2.value = v(lbound(v)+1)
Textbox3.Value = v(lbound(v)+2)

Requires xl2000 or later.

--
Regards,
Tom Ogilvy


"funkymonkUK"
wrote in message
...

hi

I got a string which is designed as follows XXXX/XX/XXXXX
X = numbers which a user has inputted. I have three textboxs which
allow the user to only enter in the values like that.

I have the following

Sub test()
Activecell.value=textbox1.value & "/" & textbox2.value & "/"
textbox3.value
End Sub

Now the problem is that I want to check the spreadsheet for this record
which was created.

If it is found then my userform is updated to show the details. How do
I rectrieve the three bits of data and put them into the relevant
textboxs.


--
funkymonkUK
------------------------------------------------------------------------
funkymonkUK's Profile:
http://www.excelforum.com/member.php...o&userid=18135
View this thread: http://www.excelforum.com/showthread...hreadid=475011