VC插入sheet页到指定位置

 VC在操作EXCEL，有时候需要在指定的位置插入SHEET页，而插入sheet的时候参数要写对，否则插入方法为无效

插入sheet的函数用 sheets.Add(Before, After,Count,Type)

四个参数含义如下：

  四个const   VARIANT:  
  Before       Variant   类型，可选。指定工作表对象，新建的工作表将置于此工作表之前。  
  After       Variant   类型，可选。指定工作表对象，新建的工作表将置于此工作表之后。  
  Count       Variant   类型，可选。要创建的工作表的数目。默认值为一。  
  Type       Variant   类型，可选。工作表类型。

如果我们默认参数都为vtMissing，则 插入sheet的位置时在当前激活sheet页之前，而且时只插入一个sheet页

sheets.Add(vtMissing, vtMissing,vtMissing,vtMissing)

 

假如我们要求插入到第二个sheet之后，第三个sheet之前，我们应该按照下面的方法写

sheets.Add(-variant_t(sheets.GetItem(COleVariant((short)2))), -variant_t(sheets.GetItem(COleVariant((short)3))),-variant_t((long)1),vtMissing)

参数不能用sheet的名称。

希望对大家有用