You can also place this line in the click event of a button on the userform
ThisWorkbook.Sheets("Sheet1").Range("a1").Value = Me.TextBox1.Value
--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2000-2003)
www.rondebruin.nl
wrote in message ...
HOW DO I DO IT?