读书人

怎么向已有的EXCEL工作薄添加工作表并

发布时间: 2012-08-08 14:32:45 作者: rapoo

怎样向已有的EXCEL工作薄添加工作表并更改表名
同上

[解决办法]

SQL code
*---VFP6.0代码EOLE=CREATEOBJECT('Excel.application')   && 创建Excel对象EOLE.WORKBOOKS.ADD                       && 添加新工作簿EOLE.WORKSHEETS("sheet1").ACTIVATE       && 设置第1个工作表为激活工作表EOLE.SHEETS.ADD(,EOLE.SHEETS(1),1,-4167) && 在指定工作表后[Sheets(1)]新建工作表EOLE.WORKSHEETS("Sheet2").NAME="新表"    && 重命名工作表2EOLE.VISIBLE=.T.                         && 显示Excel窗口
[解决办法]
oExcel.Sheets.Add

读书人网 >VFP

热点推荐