Почему мое решение не добавит ссылку на 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 

Давайте будем гением компьютера.