下面的代码即将导出到excel文件. Visual Studio发送图片中的错误。这段代码有什么问题?
Imports Microsoft.Office.Interop.Excel
Module Module3
Public Sub OOO()
Dim excel As Application = New Application
Dim workbook As Workbook = New Workbook
Dim worksheet As Worksheet = workbook.ActiveSheet
worksheet.Name = "Export as Excel Project"
worksheet.Cells(1, 1) = "Value1"
worksheet.Cells(2, 1) = "Value2"
worksheet.SaveAs("d:\Actor.xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlWorkbookDefault)
workbook.Close()
End Sub
End Module
1条答案
按热度按时间chhkpiq41#
您的代码从第一个Dim excel行开始是错误的。你期望那将是一个Excel。应用程序,但它不是,它是System。Windows。应用程序(正如我从错误窗口中理解的那样)。如果这一行是正确的,那么下一行将尝试创建一个不相关的Workbook对象。尝试:
请注意,文件扩展名是XLSX,而不是当前版本的Excel的XLS(很长一段时间真的,Excel不会打开它没有警告,如果你碰巧保存为XLS)。