获得Excel一组单元格中的数据

//获得一组单元格中的数据 
CString COperExcel::XlsGetRangeStrData(const CString &Row, const CString &Col)
{
	if (!xlsAppIsInit())
	{
		return _T("erro");
	}
	if (Row.IsEmpty() || Col.IsEmpty())
	{
		return _T("erro");
	}
	LPDISPATCH  lpDisp = NULL;
	lpDisp = m_xlsAppLication.get_ActiveSheet();
	CWorksheet    xlsSheet;
	if (lpDisp != NULL)
	{
		xlsSheet.AttachDispatch(lpDisp);
		lpDisp = xlsSheet.get_Range((_variant_t)Row, (_variant_t)Col);
	}
	else
	{
		return _T("erro");
	}
	CRange  range;
	CString strTmp = _T("");
	if (lpDisp != NULL)
	{
		range.AttachDispatch(lpDisp);
		COleVariant vResult =range.get_Value2();

		// 		if (vResult.vt == VT_BSTR)
		// 		{
		// 			strTmp = vResult.bstrVal;  //字符串
		// 		}
	}
	xlsSheet.ReleaseDispatch();
	range.ReleaseDispatch();
	return strTmp;
}