MFC 操作Excel 同一个工作簿中依次添加sheet页

1.备注：添加一个新的工作簿，其默认包含sheet1

2.获取当前的sheet页总数

    long CWorksheets:: get_Count()；

3.获取最后一个sheet页

    LPDISPATCH CWorksheets:: get_Item(VARIANT& Index)；

4.在最后一个sheet页后面依次添加

    LPDISPATCH CWorksheets::Add(VARIANT& Before, VARIANT& After, VARIANT& Count, VARIANT& Type)；

5.示例代码：

     CWorkbook book;
CWorkbooks books;
CWorksheet sheet;
CWorksheets sheets;

LPDISPATCH lpDisp;

        /*增加一个新的工作簿*/

lpDisp = books.Add(vtMissing);

book.AttachDispatch(lpDisp);

/*得到工作簿中的Sheet的容器*/

sheets.AttachDispatch(book.get_Sheets());

/*创建一个新的Sheet2*/
LPDISPATCH lpDispLast =sheets.get_Item(COleVariant(sheets.get_Count()));
lpDisp = sheets.Add(vtMissing, _variant_t(lpDispLast), _variant_t((long)1), vtMissing);
sheet.AttachDispatch(lpDisp);

sheet.put_Name(“Sheet2”);

6.结果

    当前工作簿存在两个sheet页，sheet2位于sheet1后面