Try Mid(Text1.text,3,4)
Look up in VBHelp for details, but first parameter is the string, second is start position and third is number of characters Let me know if this helps
________________________________________________________________
If you are worried about how to post, please check out FAQ222-2244 first
'There are 10 kinds of people in the world: those who understand binary, and those who don't.'