W wzdworld001 Unregistered / Unconfirmed GUEST, unregistred user! 2009-04-18 #1 现在需要讲数据库中的数据导出，而用SqlServer导出数据功能结果不是很理想所以想用程序导出到excel，这就涉及Excel中workbook、sheet的创建和重命名，不知各位富翁们有什么可用的办法
现在需要讲数据库中的数据导出，而用SqlServer导出数据功能结果不是很理想所以想用程序导出到excel，这就涉及Excel中workbook、sheet的创建和重命名，不知各位富翁们有什么可用的办法
Z znxia Unregistered / Unconfirmed GUEST, unregistred user! 2009-04-18 #2 更改workbook中，第sheetIndex个sheet的名称。WorkBook.Sheets[SheetIndex ].Name := SheetLabel;增加Sheet分为2中情况，在第C个sheet前增加SheetCount个sheet WorkBook.sheets.add(WorkBook.sheets[C], null, SheetCount);在第C个sheet后增加 WorkBook.sheets.add(Null, WorkBook.sheets[C], SheetCount)
更改workbook中，第sheetIndex个sheet的名称。WorkBook.Sheets[SheetIndex ].Name := SheetLabel;增加Sheet分为2中情况，在第C个sheet前增加SheetCount个sheet WorkBook.sheets.add(WorkBook.sheets[C], null, SheetCount);在第C个sheet后增加 WorkBook.sheets.add(Null, WorkBook.sheets[C], SheetCount)
F fanghui23 Unregistered / Unconfirmed GUEST, unregistred user! 2009-04-19 #3 我只熟悉用VBA从数据库中导出数据，而不懂其他语言。从VBA来讲，新创建一个工作簿而后在新工作簿中添加工作表都比较方便，比如： Workbooks.Add '添加工作簿 ActiveWorkbook.SaveAs ("c:/test.xls")'确定保存文件名 ActiveWorkbook.Worksheets.Add'添加工作表
我只熟悉用VBA从数据库中导出数据，而不懂其他语言。从VBA来讲，新创建一个工作簿而后在新工作簿中添加工作表都比较方便，比如： Workbooks.Add '添加工作簿 ActiveWorkbook.SaveAs ("c:/test.xls")'确定保存文件名 ActiveWorkbook.Worksheets.Add'添加工作表
W wzdworld001 Unregistered / Unconfirmed GUEST, unregistred user! 2009-04-19 #4 [h4]--->znxia[/h4]>>WorkBook.Sheets[SheetIndex ].Name := SheetLabel;我先也试过，在D7下面sheet没有"Name"属性
Z znxia Unregistered / Unconfirmed GUEST, unregistred user! 2009-04-19 #6 我用的就是D7，不过不是通过控件，而是通过CreateOleObject的方式，excell为2003.这几天正好也在处理excell，代码还是从我那边拷贝过来的，测试通过的。SheetIndex从1开始。
我用的就是D7，不过不是通过控件，而是通过CreateOleObject的方式，excell为2003.这几天正好也在处理excell，代码还是从我那边拷贝过来的，测试通过的。SheetIndex从1开始。
