0
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    workbook = APP.Workbooks.Open("C:\Users\act08\Copy of Copy of test1.xlsx")
    worksheet = workbook.Sheets.Item(1)
    'each textbox input to excel
    worksheet.Cells(1, 1).Value = TextBox1.Text
    worksheet.Cells(1, 2).Value = TextBox2.Text
    worksheet.Cells(2, 1).Value = TextBox3.Text
    'save the input
    workbook.Close(SaveChanges:=True)
    APP.Quit()
End Sub
BigBen
  • 46,229
  • 7
  • 24
  • 40
  • Which line of code is the error on? I don't see where you are creating new instances of anything. – David.Warwick Dec 02 '21 at 03:03
  • Does this answer your question? [What is a NullReferenceException, and how do I fix it?](https://stackoverflow.com/questions/4660142/what-is-a-nullreferenceexception-and-how-do-i-fix-it) – Tu deschizi eu inchid Dec 02 '21 at 03:20
  • Please clarify your specific problem or provide additional details to highlight exactly what you need. As it's currently written, it's hard to tell exactly what you're asking. – Community Dec 07 '21 at 05:43

1 Answers1

1

Without the casting, your variables end up as Object which does not have the properties and methods you are expecting from the Excel objects.

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim APP As New Excel.Application
    Dim workbook = DirectCast(APP.Workbooks.Open("C:\Users\act08\Copy of Copy of test1.xlsx"), Excel.Workbook)
    Dim worksheet = DirectCast(workbook.Sheets.Item(1), Excel.Worksheet)
    'each textbox input to excel
    Dim cell = DirectCast(worksheet.Cells(1, 1), Excel.Range)
    cell.Value = TextBox1.Text
    Dim cell2 = DirectCast(worksheet.Cells(1, 2), Excel.Range)
    cell2.Value = TextBox2.Text
    Dim cell3 = DirectCast(worksheet.Cells(2, 1), Excel.Range)
    cell3.Value = TextBox3.Text
    'save the input
    workbook.Close(SaveChanges:=True)
    APP.Quit()
End Sub
Mary
  • 14,926
  • 3
  • 18
  • 27
  • 1
    While this is generally good advice, I wouldn't expect a NullReferenceException to arise from not following it. – Craig Dec 02 '21 at 14:16