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