Ciao a tutti.

Sono qui a chiedere il vostro prezioso aiuto.

Ho scritto questa procedura per la creazione di un file excel:

codice:
Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Visible = false  
ExcelApp.Workbooks.Add
ExcelApp.Workbooks(1).ActiveSheet.Name = "Nome_foglio"
Set ExcelBook = ExcelApp.ActiveSheet

ExcelApp.Range("A1").Select
ExcelApp.ActiveCell.Formula = "ZONA"
ExcelApp.ActiveCell.Font.Bold = True
ExcelApp.ActiveCell.Font.Size = 12 
ExcelApp.ActiveCell.Font.Color = vbRed
ExcelApp.ActiveCell.Font.ColorIndex = 3
ExcelApp.ActiveCell.Interior.ColorIndex = 30

ExcelApp.ActiveWorkbook.SaveAs(Server.MapPath("Folder.xls"))
ExcelApp.Quit
Set ExcelApp = Nothing
Set ExExcelBook = Nothing
Funziona tutto tranne che non riesco:

1) ad aggiungere più fogli allo stesso file excel;
2) a saltare la prima riga dopo l'intestazione delle colonne;

Sapete aiutarmi per favore ?
Grazie