ole,create from file?

hi,
I placed a ole object in a form.from create from file I choosed EXCEL FILE"c:\stock.xls".
I don’t want to link. When I add an text in the textbox it should be added to the
Excel cells.

Code:
Dim x as string
Dim xlapp As Excel.Application
Dim xlbook As Workbook
Dim xlsheet As Worksheet
Set xlapp = New Excel.Application
Set xlbook = xlapp.Workbooks.Add
Set xlsheet = xlbook.Worksheets.Add
x = Text1.Text
xlsheet.Cells(1, 4) = x
xlsheet.application.visible=true.