日期:2014-05-18  浏览次数:20430 次

EXCEL问题!!如何在当前工作簿后面添加一个新的工作簿!
在使用EXCEL组件时如何使用worksheets来添加一个新的sheet并使其追加到当前sheel之后?

------解决方案--------------------
LZ可参考:

使用集合的 Add 方法,可以将一个或多个工作表添加到 Worksheets 集合中。Add 方法将返回新的 Worksheet 对象。如果添加多个工作表,Add 方法将返回添加到 Worksheets 集合的最后一个工作表。如果省略 Add 方法的 Before 或 After 参数,新的工作表将添加在当前活动的工作表之前。下例将一个新工作表添加到当前工作表集合中的活动工作表之前:
Dim wksNewSheet As Excel.Worksheet

Set wksNewSheet = Worksheets.Add
With wksNewSheet
' 在此处使用新工作表的
' 属性和方法。
End With

移动一个工作表,使它成为工作簿中的最后一个工作表:
Worksheets( "Sheet1 ").Move After:=Worksheets(Worksheets.Count)
-----MSDN

------解决方案--------------------
Excel.Worksheet activeSheet=(Excel.Worksheet)workbook.ActiveSheet;

Excel.Worksheet sheet = (Excel.Worksheet)excel.Sheets.Add(activeSheet,Type.Missing,Type.Missing,Type.Missing);

------解决方案--------------------

workClass = (WorkbookClass)excelClass.Workbooks.Add(Miss);
workSheet = (Worksheet)workClass.Sheets.Add(Miss,workClass.Sheets[3],Miss,Miss);
workSheet.Name = "数据 ";

Add参数
第一个在哪个工作表之前
第二个在哪个之后
后面不详

默认有三个Sheet ,索引从1开始