如何使用Lotuscript管理Excel中的工作表?

问题分析:xlWorkSheet.Move After:=  xlWorksheets(1)

:=这样的语法在Lotuscript中是不合理的。
这句代码中After表示Excel的工作表对象,我们可以使用Add方法来实现Move同样的功能。查看Sheets.Add(Before,After,Count,Type)的用法.

 

在文件操作中已经讲了Excel工作簿文件的打开,新建,保存和关闭了,这里再讲文件下的表格操作.1)新建与删除新建工作表,图表或宏表.新建的工作表将成为活动工作表.Sheets.Add(Before,After,Count,Type)说明:
BeforeVariant
类型,可选.指定工作表对象,新建的工作表将置于此工作表之前.
AfterVariant
类型,可选.指定工作表对象,新建的工作表将置于此工作表之后.
CountVariant
类型,可选.要新建的工作表的数目.默认值为1.
TypeVariant
类型,可选.指定工作表类型.可为以下XlSheetType常量之一:xlWorksheet,xlChart,xlExcel4MacroSheetxlExcel4IntlMacroSheet.默认值为xlWorksheet.如果BeforeAfter两者均省略,则新建的工作表将插入到活动工作表之前.示例:Sheets.Addafter:=Sheets(Sheets.Count)该语句可以在最后一个工作表后增加一个新表
:插入一个工作表到第二个工作表之后

Dim After As Variant

Set After = xlApp.Worksheets(2)
Set xlWorkSheet = xlApp.Worksheets.Add(Null,After)
xlWorkSheet.Name = "New test"

posted @ 2010-09-08 12:10  风影极光  阅读(248)  评论(0编辑  收藏  举报