在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 的。