Hi,

try something like

Sheets("YourSheetName").Range("a1")=YourFormName.T extbox1.Tex

--
jindo
-----------------------------------------------------------------------
jindon's Profile: http://www.excelforum.com/member.php...fo&userid=1313
View this thread: http://www.excelforum.com/showthread.php?threadid=37702