命名空间不对。
添加.NET引用“Microsoft Office Interop”,或者COM引用"Microsoft Office 12.0 Object Library "和"Microsoft Excel 14.0 Object Library"。
声明应该是这样的:
Dim xA As Microsoft.Office.Interop.Excel.Application
除非你 Imports Microsoft.Office.Interop 过,才可以 Dim xA As Excel.Application。
要加new吧,以实例化对象。
Dim xA As new Excel.Application
缺少引入,或者缺少架包