I don't quite get it...

Here is my code which works fine except I only get the structure. Where would I put the code you stated. I tried it and got member worksheet does not evaluate to an object....


oleapp=CREATEOBJECT("Excel.Application")
OleApp.DisplayAlerts=.f.
filename1="environmentalsummary.xls"
oWorkBook=oleapp.workbooks.Open(filename1)
*oWorkBook.application.visible = .T.
***Manually Save ***
curdir='\dddata\tables\'

oWorkBook.Worksheets(1).Range("A1:T1").Select

oWorkBook.SaveAs(sys(5)+curdir+'upenviro3.dbf', 8)

Thanks again.