Dim xlapp As Excel.Application = New Excel.Application
xlApp = CreateObject("Excel.Application") '创建Excel应用程序
xlApp.Workbooks.open("D:/dd.xls")
xlApp.Visible = True
嗯,在4楼没有仔细看清楚就回答了你问题。是这样的,在2007以上版本中,的确要添加对OFFICE的引用:在“解决方案资源管理器”的项目(如WindowsApplication1)上右键,选择添加引用——.net——找到Microsoft.Office.Interop.Excel——选择最高版本(我是12.0.0.0)——选中后确定
Dim MyExcel As New Microsoft.Office.Interop.Excel.Application
MyExcel.Workbooks.Open("你的文件路径")
MyExcel.Visible=True
......即可,引用了高版本的,打开低版本的XLS,DOC等就没有问题了。