'Verweis auf Excel-Library setzen
 
Dim excel As New Microsoft.Office.Interop.Excel.Application
Dim wb As Microsoft.Office.Interop.Excel.Workbook = excel.Workbooks.Open( _
  Application.StartupPath + "\Rechnungsvorlage.xlsx")
Dim ws As Microsoft.Office.Interop.Excel.Worksheet = wb.Sheets(1)
 
ws.Range("A32").Value=tbxArbeitsstunden.Text
ws.Range("C32").Value=tbxStundenEinzelpreis.Text
ws.Range("D32").Value=tbxStundenGesamtpreis.Text
 
wb.Save
 
'wb-Objekt speichern und alle Objekte entladen!

EALA FREYA FRESENA