this is using VB6

dim xl as new excel.application

xl.workbooks.open("c:\spreadsheet.xls")

xl.cells(1,1) = textbox1.text

xl.quit
set xl = nothing


you need to set the microsoft excel refererence as well first.