Public Class Form7
 
    Private Sub Form7_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Dim Excel1 As New Microsoft.Office.Interop.Excel.Application
        'Dim Excel1 As New Excel.Application
        Excel1.Workbooks.Open("C:\excel.xls")
        'Excel1.Visible = True
        Excel1.Visible = False
        'Label2.Text = Excel1.Range("C1").Value
        'abc = Excel1.Range("A2").
        'deine Operationen (z.B. Excel1.Range("A2").Select()
        'TextBox1.Text = Excel1.Range("A2").Value
 
        'For i As Integer = 1 To 2
        'ListBox1.Items.Add(Excel1.Range("A" + i.ToString).Value)
        'Next
 
        'For i As Integer = 1 To 2
        ListBox1.Items.Add(Excel1.Worksheets("Tabelle1").UsedRange.Value)
        'Next
 
        'ListBox1.Items.Add(Excel1.Range("A1").Value)
 
        Excel1.ActiveWorkbook.Close()
        Excel1.Workbooks.Close()
        Excel1.Visible = False
 
    End Sub
End Class