请问在VB中如何新建一个Excel文件?
我有一个程序，把我所查询的记录集导出成Excel但是它必需选择已经存在的Excel表，请问如何新建一个表? 问题点数：20、回复次数：1Top
1 楼Gelim（Gelim）回复于 2003-11-02 01:00:53 得分 20
Dim objExcelApp2 As Excel.Application
Dim objExcelBook2 As Excel.Workbook
Dim objExcelSheet2 As Excel.Sheets
Dim objExcelApp1 As Excel.Application
Dim objExcelBook1 As Excel.Workbook
Dim objExcelSheet1 As Excel.Sheets
Set objExcelApp2 = New Excel.Application
objExcelApp2.Visible = False
Set objExcelBook2 = Nothing
Set objExcelSheet2 = Nothing
Set objExcelBook2 = objExcelApp2.Workbooks.Open(App.Path & "\book2.xls")
Set objExcelApp1 = New Excel.Application
objExcelApp1.Visible = False
Set objExcelBook1 = Nothing
Set objExcelSheet1 = Nothing
Set objExcelBook1 = objExcelApp1.Workbooks.Open(App.Path & "\book1.xls")
Top
