MFC操作excel

来源：互联网发布：白酒经销商知乎编辑：程序博客网时间：2024/06/05 00:31
void ReportDlg::OnBtnReport() {// TODO: Add your control notification handler code hereint i=0;CString a,b,c,d,e,f;_Application app;Workbooks books;_Workbook book;Worksheets sheets;_Worksheet sheet;Range range;Font font;Range cols;COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);CFileDialog cfd(FALSE,_T(".xlsx"),NULL,OFN_FILEMUSTEXIST|OFN_HIDEREADONLY,_T("excel文件(*.xlsx)|*.xlsx|excel文件(*.xls)|*.xls||"),this);   if(cfd.DoModal()!=IDOK)     // Tell if get the image  {   return;  }  CString m_path = cfd.GetPathName();  if( !app.CreateDispatch("Excel.Application") ){this->MessageBox("无法创建Excel应用！");return;}books=app.GetWorkbooks();book=books.Add(covOptional);sheets=book.GetSheets();sheet=sheets.GetItem(COleVariant((short)1));range=sheet.GetRange(COleVariant("A1"),COleVariant("A1"));range.SetValue2(COleVariant("姓名"));range=sheet.GetRange(COleVariant("B1"),COleVariant("B1"));range.SetValue2(COleVariant("性别"));range=sheet.GetRange(COleVariant("C1"),COleVariant("C1"));range.SetValue2(COleVariant("业务类型"));range=sheet.GetRange(COleVariant("D1"),COleVariant("D1"));range.SetValue2(COleVariant("交易码"));range=sheet.GetRange(COleVariant("E1"),COleVariant("E1"));range.SetValue2(COleVariant("单号"));range=sheet.GetRange(COleVariant("F1"),COleVariant("F1"));range.SetValue2(COleVariant("办理时间"));for (i=0;i<m_ListReport.GetItemCount();i++){a.Format("A%d",i+2);b.Format("B%d",i+2);c.Format("C%d",i+2);d.Format("D%d",i+2);e.Format("E%d",i+2);f.Format("F%d",i+2);range=sheet.GetRange(COleVariant(a),COleVariant(a));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,0)));range=sheet.GetRange(COleVariant(b),COleVariant(b));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,1)));range=sheet.GetRange(COleVariant(c),COleVariant(c));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,2)));range=sheet.GetRange(COleVariant(d),COleVariant(d));range.SetNumberFormatLocal(COleVariant("@"));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,3)));range=sheet.GetRange(COleVariant(e),COleVariant(e));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,4)));range=sheet.GetRange(COleVariant(f),COleVariant(f));range.SetValue2(COleVariant(m_ListReport.GetItemText(i,5)));}//font=range.GetFont();//font.SetBold(COleVariant((short)TRUE));//range=sheet.GetRange(COleVariant("B2"),COleVariant("B2"));///range.SetFormula(COleVariant("=RAND()*100000"));//range.SetNumberFormat(COleVariant("$0.00"));//cols=range.GetEntireColumn();//cols.AutoFit();app.SetVisible(FALSE);app.SetUserControl(TRUE);book.SaveAs(COleVariant(m_path),covOptional,covOptional,covOptional,\covOptional,covOptional,0,covOptional,covOptional,covOptional,\ covOptional,covOptional);}
0 0