Question

我有一个带有1个按钮的表单，可以在我的桌面上创建一个Excel文件。

我收到错误消息：

NullReferenceException未处理
对象引用未设置为对象的实例

它突出显示了代码：

WB = excelapp.workbooks.add

我确实添加了引用“Microsoft excel 14.0”，我的完整代码如下：

imports excel = microsoft.office.interop.excel

dim excelapp as excel.application
dim WB as excel.workbook

sub button1()

WB = excelapp.workbooks.add
excelapp.visible=true

end sub

Answer 1

初学者的Excel实例上缺少新功能：

Dim xlApp As New Excel.Application
Dim xlWorkbook As Excel.Workbook = xlApp.Workbooks.Add()
Dim xlWorksheet As Excel.Worksheet = CType(xlWorkbook.Sheets("sheet1"), Excel.Worksheet)

xlWorksheet.Cells(1, 1) = "data in first cell"
xlWorksheet.SaveAs(Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\" & "Test.xlsx")

xlWorkbook.Close()
xlApp.Quit()

xlApp = Nothing
xlWorkBook = Nothing
xlWorkSheet = Nothing

你应该把它放在Try / Catch / Finally块中以便在遇到问题时捕获错误，但主要是因为如果程序没有继续正确完成该代码块，EXCEL.EXE将保持打开状态在您的任务管理器中，以及它正在访问的任何Excel文件将被另一个程序使用＆＃34;当您尝试访问/修改/删除它时。

Answer 2

只需添加一行，然后就可以了

val local = myClass;
if (local != null)
    local.Field = 42;

使用VB2010创建Excel文件

2 个答案: