VC编程实现 excel插入一行单元格Insert

2014-11-23 17:55:48 · 作者: · 浏览: 9

/*enum XlInsertFormatOrigin
{
xlFormatFromLeftOrAbove = 0,//向上插入行
xlFormatFromRightOrBelow = 1//向下插入行
};
*/

XlInsertFormatOrigin xlsInsertFormat;

本例是以Excel2007为例

CApplication xlsAppLication;

//初始化ole还有excel略

LPDISPATCH lpDisp = NULL;

lpDisp = xlsAppLication.get_ActiveSheet();
CWorksheet xlsSheet;
xlsSheet.AttachDispatch(lpDisp);

lpDisp = xlsSheet.get_Range(_variant_t(“A35”),_variant_t("A35"));
CRange rang;
rang.AttachDispatch(lpDisp);

rang.AttachDispatch(rang.get_EntireRow());

rang.Insert(vtMissing, _variant_t(xlsInsertFormat));
xlsSheet.ReleaseDispatch();
rang.ReleaseDispatch();