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开始