首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

在EXCEL中怎么实现在工作表(Sheet1)前面插入一个新的工作表

2013-05-02 
在EXCEL中如何实现在工作表(Sheet1)前面插入一个新的工作表?在EXCEL中如何实现在工作表(Sheet1)前面插入一

在EXCEL中如何实现在工作表(Sheet1)前面插入一个新的工作表?
在EXCEL中如何实现在工作表(Sheet1)前面插入一个新的工作表?
vfp命令怎么写?谢谢

[解决办法]
_ole_excel = CreateObject("Excel.Application") 
_ole_excel.VISIBLE=.T.
_ole_excel.WorkBooks.Open('123.XLS')  
AA=_ole_excel.ActiveWorkbook.Sheets
AA.ADD(_ole_excel.SHEETS(1),,1,-4167)
[解决办法]
lcFileName='c:\Book1.xls'
oExcel=Createobject('Excel.application')
oExcel.Workbooks.Open((lcFileName)) &&打开文件
oExcel.Visible=.T.
oExcel.Worksheets.Add(oExcel.Sheets(1)) && 在第1个Sheet之前新建一个 Sheet

*注意 oExcel.Sheets(1) 表示第1个 Sheet,并不一定名称为 Sheet1 的。

热点排行