Почему мое решение не добавляет ссылку на Excel?
Я пытаюсь добавить ссылку на библиотеку объектов Excel с помощью менеджера ссылок в моем решении VB. Когда я пытаюсь добавить ссылку, ничего не происходит. В этот момент мой код ломается. Что мне не хватает при добавлении ссылки?
Эта учетная форма вызывается нажатием кнопки в другой форме.
Вот мой код
'Imports Excel = Microsoft.Office.Interop.Excel
Public Class frmAccounting
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles Button1.Click
MsgBox("You are in button 1 in accounting", _ MsgBoxStyle.OkOnly, "Accounting - Step before")
'Dim xlApp As Excel.Application
'Dim xlWorkBook As Excel.Workbook
'Dim xlWorkSheet As Excel.Worksheet
'Dim range As Excel.Range
'Dim rCnt As Integer
'Dim cCnt As Integer
'Dim Obj As Object
'xlApp = New Excel.ApplicationClass
'xlWorkBook = xlApp.Workbooks.Open("\accountsreceivable.xlsx")
'xlWorkSheet = xlWorkBook.Worksheets("sheet1")
'range = xlWorkSheet.UsedRange
'For rCnt = 1 To range.Rows.Count
'For cCnt = 1 To range.Columns.Count
'Obj = CType(range.Cells(rCnt, cCnt), Excel.Range)
'MsgBox(Obj.value)
'Next
'Next
'xlWorkBook.Close()
'xlApp.Quit()
'releaseObject(xlApp)
'releaseObject(xlWorkBook)
'releaseObject(xlWorkSheet)
MsgBox("You are in button 1 in accounting", _ MsgBoxStyle.OkOnly, "Accounting - Step after")
End Sub
End class