OLE程序开发利用（开发EXCEL) 之三

 pRgMyRge->SetItem(_variant_t((long)irow),_variant_t((long)icol),_variant_t(val));

      }
      else
      {
       pRgMyRge->SetItem(_variant_t((long)irow),_variant_t((long)icol),_variant_t(szValue));
      }
     }
     
     }break; 
  }
  }
 
  catch (CUserException* pe)
  {
   pe->ReportError();
   pe->Delete();
  }

 return ;
}

_Worksheet CParameterApp::AddSheet(Worksheets &worksheets, _Worksheet &worksheet)
{
file://添加所有的表单
 _Worksheet worksheettemp;
 CString strSelRepName;
 int nCount =m_strRepNameArray.GetSize();

 for(int i=1/*0*/;i<nCount;i++)
 {
 
  strSelRepName=m_strRepNameArray[i];
  
  worksheettemp.AttachDispatch(worksheets.Add(vtMissing,_variant_t(worksheet),vtMissing,vtMissing),true);
  worksheettemp.SetName(strSelRepName);
  worksheet.AttachDispatch(worksheet.GetNext(),true);

 }
 return worksheettemp;
}