VS2005 - Scrivere su file excel

        Imports Excel = Microsoft.Office.Interop.Excel


        Dim path As String = "c:/file.xls" ' Path dove si trova il tuo file

        Dim xlApp As Excel.Application ' Riferimento all'applicazione Excel
        Dim xlBook As Excel.Workbook ' Riferimento al Workbook
        Dim xlSheet As Excel.Worksheet ' Riferimento al Worksheet

        Try

            ' Crei un'oggetto Applicazione Excel, assegnandola alla variabile che la identifica:
            xlApp = CreateObject("Excel.Application")

            ' Ai riferimenti del workbook il il File Excel che vuoi aprire
            xlBook = xlApp.Workbooks.Open(path)

            xlBook = xlApp.Workbooks.Open(path) ' Apro il file

            ' Definisci il foglio di lavoro
            xlSheet = xlBook.Worksheets(1)

            xlSheet.Activate() ' Attiva il foglio di lavoro

            ' Completo il foglio excel
            xlSheet.Cells(1, 1).Value = Me.TextBox1.Text
            xlSheet.Cells(2, 2).Value = Me.TextBox2.Text
            xlSheet.Cells(3, 3).Value = Me.TextBox3.Text
            
            ' ... ....

        Catch ex As Exception
            MessageBox.Show(ex.Message)

        Finally
            ' Poi al momento di chiudere:
            xlBook.Close(True) ' Chiudi il foglio di lavoro salvando (true) o non salvando (False)
            xlApp.Quit() ' Chiudi l'applicazione excel

            ' Annienta le variabili utilizzate.
            xlSheet = Nothing
            xlBook = Nothing
            xlApp = Nothing
        End Try

 Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra