Renaming and Creating Worksheets

[Gintaras]

Macro

Code:

Copy      Help

out
str sfile="$personal$\book1.xls"
Excel.Application app._create
Excel.Workbook book=app.Workbooks.Open(_s.expandpath(sfile))
app.Visible=-1
Excel.Worksheet ws=book.Worksheets.Add
ws.Name="test"
;
;book.Save
;book.Close