vb中excel的路径如何保存？ – 网络|

DimexlAppAsExcel.Application

DimexlBookAsExcel.Workbook

SetexlApp=NewExcel.Application

exlApp.Visible=True’显示Excel窗口

SetexlBook=exlApp.Workbooks.Open(App.Path+”\test.xls”)’Excel文件路径及文件名

‘向Excel表中写入数据，Sheets(1)为第1个工作表，Cells(行号,列号)是单元格

exlApp.Sheets(1).Cells(1,1)=”11″

exlApp.Sheets(1).Cells(1,2)=”12″

exlApp.Sheets(1).Cells(2,1)=”21″

exlApp.DisplayAlerts=False’不显示警告信息

exlBook.CloseTrue’先保存修改再关闭工作簿

exlApp.Quit’关闭Excel