问几个和文件相关的问题:  
  1、如何将文件保存成Excel格式
  2、如何将几个不同类中的几个不同文件保存成一个Excel文件
请指教,谢谢

解决方案 »

  1.   

    楼上的函数不是将图片倒如EXCEL表中吗,不能实现我问的问题呀
      

  2.   

    我用的是excel2000 
    首先利用Visual C++ 6.0,建立一个MFC基于对话框的工程项目,共享DLL,Win32平台。工程名称ExcelTest。在主对话框中加入一个按钮, 
    ID IDC_EXCELTEST 
    Caption Test Excel 
    双击该按钮,增加成员函数void CExcelTestDlg::OnExceltest()。 
    在BOOL CExcelTestApp::InitInstance()中,dlg.DoModal();之前增加代码: 
    if (CoInitialize(NULL)!=0) 

    AfxMessageBox("初始化COM支持库失败!"); 
    exit(1); 

    在return FALSE; 语句前,加入: 
    CoUninitialize(); 
    选择Menu->View->ClassWizade,打开ClassWizade窗口,选择Add Class->From a type library,选择D:\Program Files\Microsoft Office\office\Excel9.OLB(D:\Program Files\Microsoft Office\是本机上Microsoft Office 2000的安装目录,可根据个人机器上的实际安装目录修改)。选择_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range,加入新类,分别为_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range,头文件Excel9.h,源文件Excel9.cpp。 
    在ExcelTestDlg.cpp文件的头部,#include "ExcelTestDlg.h"语句之下,增加 : 
    #include "comdef.h" 
    #include "Excel9.h" 
    在void CExcelTestDlg::OnExceltest() 函数中增加如下代码: 
    void CExcelTestDlg::OnExceltest() 

    _Application ExcelApp; 
    Workbooks wbsMyBooks; 
    _Workbook wbMyBook; 
    Worksheets wssMysheets; 
    _Worksheet wsMysheet; 
    Range rgMyRge; 
    //创建Excel 2000服务器(启动Excel) if (!ExcelApp.CreateDispatch("Excel.Application",NULL)) 

    AfxMessageBox("创建Excel服务失败!"); 
    exit(1); 

    //利用模板文件建立新文档 
    wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true); 
    wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("g:\\exceltest\\MyTemplate.xlt"))); 
    //得到Worksheets 
    wssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true); 
    //得到sheet1 
    wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("sheet1")),true); 
    //得到全部Cells,此时,rgMyRge是cells的集合 
    rgMyRge.AttachDispatch(wsMysheet.GetCells(),true); 
    //设置1行1列的单元的值 
    rgMyRge.SetItem(_variant_t((long)1),_variant_t((long)1),_variant_t("This Is A Excel Test Program!")); 
    //得到所有的列 
    rgMyRge.AttachDispatch(wsMysheet.GetColumns(),true); 
    //得到第一列 
    rgMyRge.AttachDispatch(rgMyRge.GetItem(_variant_t((long)1),vtMissing).pdispVal,true); 
    //设置列宽 
    rgMyRge.SetColumnWidth(_variant_t((long)200)); 
    //调用模板中预先存放的宏 
    ExcelApp.Run(_variant_t("CopyRow"),_variant_t((long)10),vtMissing,vtMissing, 
    vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, 
    vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, 
    vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, 
    vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing); 
    //打印预览 
    wbMyBook.SetSaved(true); 
    ExcelApp.SetVisible(true); 
    wbMyBook.PrintPreview(_variant_t(false)); 
    //将文件保存为2.xls 
    wbMyBook.SaveAs(COleVariant("C:\\2.xls"),covOptional,covOptional,covOptional,covOptional,covOptional,0,covOptional,covOptional,covOptional,covOptional);  
    //释放对象 
    rgMyRge.ReleaseDispatch(); 
    wsMysheet.ReleaseDispatch(); 
    wssMysheets.ReleaseDispatch(); 
    wbMyBook.ReleaseDispatch(); 
    wbsMyBooks.ReleaseDispatch(); 
    ExcelApp.ReleaseDispatch(); 
    }
      

  3.   

    选择D:\Program Files\Microsoft Office\office\Excel9.OLB(D:\Program Files\Microsoft Office\是本机上Microsoft Office 2000的安装目录,可根据个人机器上的实际安装目录修改)。选择_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range请问一下为什么我在我的机器上找不到_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range,应该怎样找,这些具体能实现什么功能呢,谢谢