把lisctrl数据导出到excel效率太低，如何优化？

[像我这么帅的只有一个]

网上的参考的代码，保存时很慢，10K数据，耗时5S，如何优化？

// 显示保存文件对话框   
	if (IDOK == fileDlg.DoModal())   
	{   
		// 如果点击了文件对话框上的“保存”按钮，进行保存操作
		strFilePath = fileDlg.GetPathName();  
		int cc = m_datalist.GetItemCount();
		if (cc == 0)
		{
			return;
		}
		COleVariant covTrue((short)TRUE),covFalse((short)FALSE),covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
		CApplication app;
		CWorkbooks books;
		CWorkbook book;
		CWorksheets sheets;
		CWorksheet sheet;
		CRange range;
		CFont0 font;
		if (!app.CreateDispatch(_T("Excel.Application")))
		{
			//MessageBox(_T("创建EXCEL启动器失败！"));
			return;
		}
		//Get a new workbook.
		books = app.get_Workbooks();
		book = books.Add(covOptional);
		sheets = book.get_Worksheets();
		sheet = sheets.get_Item(COleVariant((short)1));

		//CListCtrl控件report风格,获取列表头
		CHeaderCtrl   *pmyHeaderCtrl;
		pmyHeaderCtrl = m_datalist.GetHeaderCtrl();

		int iRow,iCol;
		int m_cols = pmyHeaderCtrl-> GetItemCount();
		int m_rows = m_datalist.GetItemCount();
		HDITEM hdi;
		TCHAR lpBuffer[256];
		bool fFound = false;

		hdi.mask = HDI_TEXT;
		hdi.pszText = lpBuffer;
		hdi.cchTextMax = 256;
		CString colname;
		CString strTemp;
		for(iCol=0;iCol <m_cols;iCol++)//将表头写入EXCEL
		{
			GetCellName(1,iCol + 1,colname);
			range = sheet.get_Range(COleVariant(colname),COleVariant(colname));
			pmyHeaderCtrl-> GetItem(iCol,&hdi);
			range.put_Value2(COleVariant(hdi.pszText));
			int nWidth = m_datalist.GetColumnWidth(iCol)/6;
			//得到第iCol+1列  
			range.AttachDispatch(range.get_Item(_variant_t((long)(iCol+1)),vtMissing).pdispVal,true);  
			//设置列宽 
			range.put_ColumnWidth(_variant_t((long)nWidth));

		}
		range = sheet.get_Range(COleVariant( _T("A1 ")),COleVariant(colname));
		range.put_RowHeight(_variant_t((long)50));//设置行的高度
		font = range.get_Font();
		font.put_Bold(covTrue);
		range.put_VerticalAlignment(COleVariant((short)-4108));//xlVAlignCenter   =   -4108

		COleSafeArray   saRet;
		DWORD  numElements[]={m_rows,m_cols};       //5x2   element   array
		saRet.Create(VT_BSTR,2,numElements);
		range = sheet.get_Range(COleVariant( _T("A2 ")),covOptional);
		range = range.get_Resize(COleVariant((short)m_rows),COleVariant((short)m_cols));
		long  index[2];

		range = sheet.get_Range(COleVariant( _T("A2 ")),covOptional);
		range = range.get_Resize(COleVariant((short)m_rows),COleVariant((short)m_cols));
		for (iRow = 1;iRow<=  m_rows;iRow++)//将列表内容写入EXCEL
		{
			for(iCol= 1;iCol<= m_cols;iCol++)  
			{
				index[0]=iRow-1;
				index[1]=iCol-1;
				CString szTemp;
				szTemp=m_datalist.GetItemText(iRow-1,iCol-1);
				BSTR bstr = szTemp.AllocSysString();
				saRet.PutElement(index,bstr);
				SysFreeString(bstr);
			}

		}
		range.put_Value2(COleVariant(saRet));
		book.SaveCopyAs(COleVariant(strFilePath));

		//cellinterior.ReleaseDispatch();
		book.put_Saved(true);
		book.ReleaseDispatch();  
		books.ReleaseDispatch();  
		app.Quit();
		app.ReleaseDispatch();

[ArthurKingYs]

通过数据库，数据存到数据库，数据库直接导出excel

[赵4老师]

先保存到.csv文件中，再在Excel中导入这个.csv文件。

[像我这么帅的只有一个]

确实是用读写文件的方式，保存为.csv格式，速率飞快的提升了。我结贴没看见楼上的回复，不好意思没给分。