C++ Excel操作的小函数

仅仅是插入行，修改背景颜色，加粗字体等，后续会再增加。

.................h

 BOOL insertrow( int IRow);         //插入行
 BOOL SetFontCloer(int irow);       //填充颜色
.......cpp
/******************************************************************************
函数名称 : insertrow
函数功能 : 在excel中插入一行，与插入位置的下一行格式相同
输入参数 : IRow     需要插入的位置
输出参数 : 无
返回值   : 

修改历史 : 
******************************************************************************/
BOOL HealthCheckExport::insertrow(int IRow)
{
	COleVariant
		covTrue((short)TRUE),
		covFalse((short)FALSE),
		covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);                                //set coleevariant
	Range ranall, ranbefore, ranafter;

	ranall.AttachDispatch(m_TempSheet.GetCells());                                        //ranall为所有的单元格集合
	ranbefore.AttachDispatch(ranall.GetItem(COleVariant(((short)(m_iRow))), COleVariant((1L))).pdispVal, TRUE);
	ranbefore.AttachDispatch(ranbefore.GetEntireRow(), TRUE);                                                      //设置/复制插入单元格的格式
	ranafter.AttachDispatch(ranall.GetItem(COleVariant(((short)(m_iRow))), COleVariant((1L))).pdispVal, TRUE);
	ranafter.AttachDispatch(ranafter.GetEntireRow(), TRUE);//((short)(m_iRow))                                     //设置/复制插入单元格的格式
	ranafter.Copy(covOptional);
	ranbefore.Insert(COleVariant((short)(m_iRow)),COleVariant(1L));                                                //插入单元格
	return TRUE;
}


/******************************************************************************
函数名称 : SetFontCloer
函数功能 : 填充颜色
输入参数 : 
输出参数 : 无
返回值   : 

修改历史 : 
******************************************************************************/
BOOL HealthCheckExport::SetFontCloer(int iRow)
{
	//设置背景颜色
	Interior  font;
	//Fonts  TextFont;
	m_TempRangColor.AttachDispatch(m_TempSheet.GetCells());
	m_TempRangColor.AttachDispatch((m_TempRangColor.GetItem(COleVariant(long(iRow)), COleVariant(long(1L)))).pdispVal, TRUE);
	font.AttachDispatch(m_TempRangColor.GetInterior());

	//设置字体
	Fonts font1; 
	m_TempRangColor.AttachDispatch(m_TempSheet.GetCells()); 
	m_TempRangColor.AttachDispatch((m_TempRangColor.GetItem (COleVariant(long(1)), COleVariant(long(1)))).pdispVal);
	//m_TempRangColor.AttachDispatch(m_TempRangColor.GetEntireColumn());
	font1.AttachDispatch (m_TempRangColor.GetFont ()); 
	font1.SetColor(COleVariant((long)0xFF0000));
	font1.SetBold(COleVariant((short)TRUE)); 

	font.SetColorIndex(COleVariant((long)(15)));
	font.ReleaseDispatch();
	font1.ReleaseDispatch();

	return TRUE;
}