VB. net and Excel files

[hobbes2103]

Hello!

 

I'm looking for any tutorial that explains the syntaxes to open a new Excel file, write in it and save it (all of this from a VB. net form of course)

 

Thank you!

[dynamic_sysop]

using a reference to the microsoft excel object library ( 10.0 in this case )

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim oDialog As New OpenFileDialog()
       oDialog.Filter = "Excel files|*.xls" '/// select an excel file from an opendialog box.
       oDialog.ShowDialog()
       Dim objExcel As New excel.Application()
       Dim objBook As excel.Workbook = objExcel.Workbooks.Open(oDialog.FileName)
       Dim objSheet As excel.Worksheet = objBook.Worksheets.Item("Sheet1") '/// your sheet name here.
       Dim x As Integer
       Try
           For x = 1 To objSheet.UsedRange.Count
               ListBox1.Items.Add(objSheet.UsedRange(x).value) '/// add each item from Sheet1 to a listbox.
           Next
           objSheet.Cells(1, x).value = "a new item added" '/// add a new item to the next free column in row 1.
           objBook.Save() '/// save the changes.
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       Finally

           objExcel.Application.Quit()

           objSheet = Nothing
           objBook = Nothing
           objExcel = Nothing
       End Try
   End Sub