VC操作Excel文件保存问题

最新推荐文章于 2021-05-29 17:01:07 发布
最新推荐文章于 2021-05-29 17:01:07 发布
阅读量3k 收藏 7
点赞数
分类专栏： Office开发系列 VC经典技术 C/C++经典技术 文章标签： excel microsoft c 服务器 mfc 数据库
本文介绍使用VC通过Automation技术操作Excel的方法，包括启动、读写数据、设置格式及关闭Excel等步骤，并解决保存文件时出现的另存为对话框问题。

 

用VC对Excel文件进行写操作后，在程序结束前需要对一些对象进行收尾工作，如调用_Workbook::Save()方法(该方法是Microsoft提供的供VC调用的对Excel文件操作的标准方法，在文件excel9.cpp或excel.cpp中定义)保存文件。

 

问题就出现在这里，若选取要保存的Excel文件以前不存在则程序创建一个同名的空Excel文件，对Excel表的操作实际是对其同名副本的操作，Save()方法会触发一个"另存为"的对话框，需要覆盖原来同名的空Excel文件，否则写入Excel的数据会丢失。若选取的Excel文件已经存在，则调用Save()方法不会触发"另存为"对话框，系统会自动保存写到Excel中的数据。

需要说明的是，在调用Save()前，已经调用过SetAlertBeforeOverwriting(FALSE)和SetDisplayAlerts(FALSE)关掉一些警告窗口了。若调用SaveAs()方法，虽不会触发"另存为"对话框，但会出抛出“找不到成员”的错误，这时保存写好的Excel文件后并重新打开发现数据还是丢失。

想尽所有办法，可总无法去掉那个讨厌的"另存为"对话框，请各位大虾帮忙。多谢了！

SaveAs()是excelapp的方法吗。

 

xlApp.ActiveWorkbook.SaveAs "C:/excel.xls" 

xlApp.Quit

我的没有问题。

如今Excel是越来越重要了，在我们自己开发的程序中不免要和Excel打交道了。利用Automation技术，我们可以在不去了解

 

数据库的情况下玩转Excel，而且你会发现一切竟如此轻松！

    好了，咱们开始吧，我不喜欢用长篇累牍的代码来故弄玄虚，所以下面的代码都是切中要害的片段，总体上是个连贯的过程，

包括启动Excel，读取数据，写入数据，以及最后的关闭Excel，其中还包括了很多人感兴趣的合并单元格的处理。

    特别说明以下代码需要MFC的支持，而且工程中还要包含EXCEL2000的定义文件：EXCEL9.H，EXCEL9.CPP

*****************************************************************************************************************

 //*****

 //变量定义

 _Application app;    

 Workbooks books;

 _Workbook book;

 Worksheets sheets;

 _Worksheet sheet;

 Range range;

 Range iCell;

 LPDISPATCH lpDisp;    

 COleVariant vResult;

 COleVariant

        covTrue((short)TRUE),

        covFalse((short)FALSE),

        covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);    

 

 //*****

 //初始化COM的动态连接库

 if(!AfxOleInit())  

 {

        AfxMessageBox("无法初始化COM的动态连接库!");

        return ;

     }   

 

 

 //*****

 //创建Excel 2000服务器(启动Excel)

 if(!app.CreateDispatch("Excel.Application")) 

 {

  AfxMessageBox("无法启动Excel服务器!");

    return;

 }

 

 app.SetVisible(TRUE);          //使Excel可见

 app.SetUserControl(TRUE);      //允许其它用户控制Excel

 

 //*****   

 //打开c://1.xls

 books.AttachDispatch(app.GetWorkbooks());

 lpDisp = books.Open("C:////1.xls",      

   covOptional, covOptional, covOptional, covOptional, covOptional,

   covOptional, covOptional, covOptional, covOptional, covOptional,

   covOptional, covOptional );    

  

     

 //*****

 //得到Workbook

 book.AttachDispatch(lpDisp);

 

 

 //*****

 //得到Worksheets 

 sheets.AttachDispatch(book.GetWorksheets()); 

 

 

 //*****

 //得到当前活跃sheet

 //如果有单元格正处于编辑状态中，此操作不能返回，会一直等待

 lpDisp=book.GetActiveSheet();

 sheet.AttachDispatch(lpDisp); 

  

 //*****

 //读取已经使用区域的信息，包括已经使用的行数、列数、起始行、起始列

 Range usedRange;

 usedRange.AttachDispatch(sheet.GetUsedRange());

 range.AttachDispatch(usedRange.GetRows());

 long iRowNum=range.GetCount();                   //已经使用的行数

 

 range.AttachDispatch(usedRange.GetColumns());

 long iColNum=range.GetCount();                   //已经使用的列数

  

 long iStartRow=usedRange.GetRow();               //已使用区域的起始行，从1开始

 long iStartCol=usedRange.GetColumn();            //已使用区域的起始列，从1开始

  

  

 //*****

 //读取第一个单元格的值

 range.AttachDispatch(sheet.GetCells()); 

 range.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)1)).pdispVal );

 COleVariant vResult =range.GetValue();

 CString str;

 if(vResult.vt == VT_BSTR)       //字符串

 {

  str=vResult.bstrVal;

 }

 else if (vResult.vt==VT_R8)     //8字节的数字 

 {

  str.Format("%f",vResult.dblVal);

 }

 else if(vResult.vt==VT_DATE)    //时间格式

 {

  SYSTEMTIME st;

     VariantTimeToSystemTime(&vResult.date, &st);

 }

 else if(vResult.vt==VT_EMPTY)   //单元格空的

 {

  str="";

 }  

 

 

 //*****

 //读取第一个单元格的对齐方式，数据类型:VT_I4

 //读取水平对齐方式

 range.AttachDispatch(sheet.GetCells());

 iCell.AttachDispatch((range.GetItem (COleVariant(long(1)), COleVariant(long(1)))).pdispVal);

 vResult.lVal=0;

 vResult=iCell.GetHorizontalAlignment();

 if(vResult.lVal!=0)

 {

  switch (vResult.lVal)

  {

  case 1:      //默认

   break;

  case -4108:  //居中

   break;

  case -4131 : //靠左

   break;

  case -4152 : //靠右

   break;

  }

 

 }

  

 //垂直对齐方式

 iCell.AttachDispatch((range.GetItem (COleVariant(long(1)), COleVariant(long(1)))).pdispVal);

 vResult.lVal=0;

 vResult=iCell.GetVerticalAlignment();

 if(vResult.lVal!=0)

 {

  switch (vResult.lVal)

  {

  case -4160 :  //靠上

   break;

  case -4108 :  //居中

   break;

  case -4107 :  //靠下

   break;

  }

 

 }

 

  

 //*****

 //设置第一个单元格的值"HI,EXCEL!"

 range.SetItem(COleVariant(1),COleVariant(1),COleVariant("HI,EXCEL!")); 

 

 //*****

 //设置第一个单元格字体颜色:红色

 Font font;

 range.AttachDispatch(sheet.GetCells());

 range.AttachDispatch((range.GetItem (COleVariant(long(1)), COleVariant(long(1)))).pdispVal);

 font.SetColor(COleVariant((long)0xFF0000));  

 

 

 //*****

 //合并单元格的处理

 //包括判断第一个单元格是否为合并单元格，以及将第一个单元格进行合并

 Range unionRange;

 range.AttachDispatch(sheet.GetCells()); 

 unionRange.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)1)).pdispVal );

  

 vResult=unionRange.GetMergeCells();    

 if(vResult.boolVal==-1)             //是合并的单元格    

 {

  //合并单元格的行数 

  range.AttachDispatch (unionRange.GetRows ());

  long iUnionRowNum=range.GetCount (); 

   

  //合并单元格的列数

  range.AttachDispatch (unionRange.GetColumns ());

  long iUnionColumnNum=range.GetCount ();   

  

  //合并区域的起始行，列

  long iUnionStartRow=unionRange.GetRow();       //起始行，从1开始

  long iUnionStartCol=unionRange.GetColumn();    //起始列，从1开始

  

 }

 else if(vResult.boolVal==0)   

 {//不是合并的单元格}

 

 //将第一个单元格合并成2行，3列

 range.AttachDispatch(sheet.GetCells()); 

 unionRange.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)1)).pdispVal );

 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)3)));

 unionRange.Merge(COleVariant((long)0));   //合并单元格

 

 

 //*****

 //将文件保存为2.xls 

 book.SaveAs(COleVariant("C:////2.xls"),covOptional,covOptional, //

  covOptional,covOptional,covOptional,0,//

  covOptional,covOptional,covOptional,covOptional);  

  

  

 //*****

 //关闭所有的book，退出Excel 

 book.Close (covOptional,COleVariant(OutFilename),covOptional);

 books.Close();      

 app.Quit();

// Excel保存

 

        Sheet.OleProcedure("SaveAs", FName.c_str());

www.ccrun.com里面有说道。

VC下设置Excel单元格的边框 (转)

      为了能使得输出到Excel中的数据显示表格，可以调用事先设置好的模板，但是不灵活。我花了一个中午的时间摸索出如何设置它了。

      具体代码如下：

 LPDISPATCH pRange;

 CString   cell;

 int   c,c1,c2;

 _variant_t  vRange1;   // 设置单元格的线；

 _variant_t  vRange2;

 _variant_t  vRange3;

 _variant_t  vRange4;

   c='A';

   c1=j/26;

   c2=j%26;

   if(c1==0)

    cell.Format("%c%d",c2+c,i+1); // i+1 ：表示从第二行开始关联

   else

    cell.Format("%c%c%d",c1+c-1,c2+c-1,i+1);

 VERIFY(pRange = m_worksheet.GetRange(COleVariant(cell)));

   m_range.AttachDispatch(pRange);

   //对齐方式

   Var.vt = VT_I2;

   Var.iVal=-4108;

   m_range.SetHorizontalAlignment(Var);

   m_range.SetVerticalAlignment(Var);

   //

   // 设置单元格的线；

   vRange1.vt =VT_I2;

   vRange1.lVal =1;   // 线的样式：0- no line; 1-solid; 2-big dot;3-small dot;4-dash dot; 5-dash dot dot;

   vRange2.vt =VT_I2;

   vRange2.lVal =3;  // 线的粗细程度；

   vRange3.vt =VT_I2;

   vRange3.lVal =1;   // 1-black;2-white;3-red;4-green;5-blue; 6-yellow; 7-pink;8-dark blue;

   vRange4.vt = VT_UI4;

   vRange4.uintVal =RGB(0,0,0);  // 我测试后认为，没有实际意义，只有vRange3起作用

   m_range.BorderAround(vRange1,vRange2,vRange3,vRange4);

   //

   //

   strValue=m_book.GetTextRC(i,j+2);

   strValue.TrimLeft(" ");

   strValue.TrimRight(" ");  

   if(!strValue.IsEmpty())

   {

    m_range.SetValue(COleVariant(strValue));

   }

   m_range.ReleaseDispatch();

//

 虽然没有什么高深的技术含量，只是为了让后面需要的人少走点弯路。

不当之处，还望指正。

 

 

更多技术文章请参看施昌权的个人网站： http://www.joyvc.cn 

 

 

VC6.0生成Excel文件
冷秋魂的专栏
05-09 9783
 源码请参考：在我的资源中：VC读写Excel 上文介绍了读取Excel文件中数据的方法，这回说明生成一个Excel文件的方法。 初始化Com库和使用的对象都和上文一样，下面这段代码的逻辑是：1.       先打开一个Excel文件，2.       在激活的Sheet的下一个sheet中写入数据3.       保存成另外一个文件        if
VC读取、保存excel
10-25
vc6.0环境里建立mfc工程，实现对excel数据的读取、保存。读取特定列，根据checkbox选中状态，保存所选行到新的excel。响应点击函数，一次选择多行。涉及对话框操作。
利用VC++向excel表中保存数据
12-04
通过本文及配套示例源码你可以更加灵活的控制Excel表格文件，其中包括创建新Excel文件、写入表格数据、读取表格数据(包括对原建Excel文件自已手工添加的行、列数据的准确读取)，删除已有Excel表格，对表格中指定行、列、单元格进行查询、插入、替换等操作，同时还可以将生成的Excel文件转换为按指定分隔符分隔的其它文本格式的文件。下面是把此方法用VC6编写的示例程序运行效果
VC操作Excel文件保存
透明果冻
08-13 4266
 用VC对Excel文件进行写操作后，在程序结束前需要对一些对象进行收尾工作，如调用_Workbook::Save()方法(该方法是Microsoft提供的供VC调用的对Excel文件操作的标准方法，在文件excel9.cpp或excel.cpp中定义)保存文件。问题就出现在这里，若选取要保存的Excel文件以前不存在则程序创建一个同名的空Excel文件，对Excel表的操作实际是对其同名副本的操
VC使用Excel创建保存新workbook文档 删除worksheet
仓
06-30 2777
 _Application excelApp; _Application excelProtectApp; Workbooks workbooks; _Workbook workbook; Worksheets worksheets; _Worksheet worksheet; // 文件打开选项COleVariant   vOptional((long)DISP_E_PARAMNOTFOUND,
在VC中如何将文件保存为EXCEL格式.rar_Excel vc_VC excel_vc txt excel_保存_保存exce
09-14
在VC++环境中，将数据保存为Excel格式通常涉及到使用Microsoft的COM接口，即自动化服务器（Automation Server）来操作Excel应用程序对象。以下是一个详细的步骤指南，教你如何在VC++中实现这个功能： 1. **理解COM...
VC操作Excel文件时的保存问题解决方案
"VC操作Excel文件保存的相关知识点" 在学习VC操作Excel文件时，需要了解以下几个重要的知识点： 一、使用_Workbook::Save()方法保存Excel文件 在VC中，使用_Workbook::Save()方法可以保存Excel文件，该方法是...
VC保存EXCEL文件
01-09
### VC保存EXCEL文件知识点详解 #### 一、概述 在使用VC++（Visual C++）进行编程时，经常会遇到需要操作Excel文件的情况。本文档将详细介绍如何利用VC++通过Automation技术来操作Excel文件，包括读取数据、写入...
vc++使用MFC操作EXCEL文件 创建+编辑+保存 详解及源代码
03-28
在VC++环境中，使用Microsoft Foundation Classes (MFC)来操作Excel文件可以实现对Excel的创建、编辑和保存功能。MFC是微软为Windows应用程序开发提供的一套类库，它基于C++并封装了Windows API，使得开发者能更方便...
vc读取excel文件demo.zip
11-24
这个“vc读取excel文件demo.zip”压缩包提供了一个使用MFC（Microsoft Foundation Classes）框架来读取和写入Excel文件的示例。MFC是微软为C++开发者设计的一个类库，它简化了Windows API的使用，让开发者可以更方便...
excel9.h和excel9.cpp
06-17
vc操作excel需要的库函数，用法，添加这2个文件到你的过程中，然后用的时候include即可
VC++excel文件导入和导出操作
04-22
execel文件导入和导出的操作，MFC文件
Excel2003导出文件（Excel.h和Excel.cpp)
11-15
网络上能够找到的Excel导出文件为Excel9，是Office2000的，版本较老。现从Excel2003中导出新的头文件：Excel11.h,Excel11.cpp
VC++（VS2010）读写Excel文件代码（附示例）
11-22
【前言】 工作或学习中可能需要实现基于VC读\写Excel文件的功能，本人最近也遇到了该问题。中间虽经波折，但是最终还是找到了解决问题的办法。 在此跟大家分享，希望对跟我同样迷茫过的同学们有所帮助。 1、程序功能 1）打开一个excel文件; 2）显示到CListCtrl上; 3）新建一个Excel文件。 以上均在对话框中实现。 2、平台 VC++2010 3、实现方法 常用的Excel打开方式有两种 1）通过数据库打开; 2）OLE方式打开。 由于方式1）操作繁琐，经常出现莫名的错误，这里选用方式2）. 4、准备步骤 首先新建一个Dialog窗体程序，添加list control和两个按钮 1）将ExcelLib文件夹拷贝到程序目录下； 2）将Export2Excel.h，Export2Excel.cpp两个文件添加到项目； 3）包含头文件，#include "ExcelLib/Export2Excel.h" 通过以上步骤在程序中引入了可以读取Excle文件的CExport2Excel类； 5、打开excel文件 通过按钮点击打开 void CExcelTestDlg::OnBnClickedButtonOpenExcel() { //获取文件路径 CFileDialog* lpszOpenFile; CString szGetName; lpszOpenFile = new CFileDialog(TRUE,"","",OFN_FILEMUSTEXIST|OFN_HIDEREADONLY,"Excel File(*.xlsx;*.xls)|*.xls;*.xlsx",NULL); if (lpszOpenFile->DoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //打开文件 //文件中包含多个sheet时，默认打开第一个sheet CExport2Excel Excel_example; Excel_example.OpenExcel(szGetName); //获取sheet个数 int iSheetNum = Excel_example.GetSheetsNumber(); //获取已使用表格行列数 int iRows = Excel_example.GetRowCount(); int iCols = Excel_example.GetColCount(); //获取单元格的内容 CString cs_temp = Excel_example.GetText(1,1); //AfxMessageBox(cs_temp); //List control上显示 //获取工作表列名（第一行） CStringArray m_HeadName; m_HeadName.Add(_T("ID")); for (int i=1;iGetItemCount()>0) { m_list.DeleteColumn(0); } //初始化ClistCtrl，加入列名 InitList(m_list,m_HeadName); //填入内容 //第一行是标题，所以从第2行开始 CString num; int pos; for (int row = 2;row<=iRows; row++) { pos = m_list.GetItemCount(); num.Format(_T("%d"),pos +1); m_list.InsertItem(pos,num); for (int colum=1;columDoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //文件全名称 CString csFileName = szGetName; //需要添加的两个sheet的名称 CString csSheetName = "newSheet"; CString csSheetName2 = "newSheet2"; // 新建一个excel文件，自己写入文字 CExport2Excel Excel_example; //新建excel文件 Excel_example.CreateExcel(csFileName); //添加sheet,新加的sheet在前，也就是序号为1 Excel_example.CreateSheet(csSheetName); Excel_example.CreateSheet(csSheetName2); //操作最开始添加的sheet:(newSheet) Excel_example.SetSheet(2); //添加表头 Excel_example.WriteHeader(1,"第一列"); Excel_example.WriteHeader(2,"第二列"); //添加核心数据 Excel_example.WriteData(1,1,"数据1"); Excel_example.WriteData(1,2,"数据2"); //保存文件 Excel_example.Save(); //关闭文件 Excel_example.Close(); } 7、注意事项 1)一般单个Excel文件包含多个sheet,程序默认打开第一个； 2)指定操作sheet，使用Excel_example.SetSheet(2)函数; 3）打开文件时最左侧的sheet序号为1，新建excel时最新添加的sheet序号为1. 【后记】 本程序主要基于网络优快云中---“Excel封装库V2.0”---完成，下载地址是：http://download.youkuaiyun.com/detail/yeah2000/3576494，在此表示感谢！同时， 1）在其基础上作了小改动，改正了几个小错误，添加了几个小接口； 2）添加了如何使用的例子，原程序是没有的； 3）详细的注释 发现不足之处，还请大家多多指教！
vc操作Excel保存 和Excel的退出
qq_18626193的博客
05-29 163
https://blog.youkuaiyun.com/wuan584974722/article/details/23863615?utm_medium=distribute.pc_relevant.none-task-blog-2%7Edefault%7EBlogCommendFromMachineLearnPai2%7Edefault-3.control&depth_1-utm_source=distribute.pc_relevant.none-task-blog-2%7Edefault%7EBlogC
VC中如何将文件保存为EXCEL格式(CSpreadSheet)
前路漫漫的博客
02-22 1601
//////////////////////////////////////////////////////////////////////////////    //类名：CExcelAccessDlg    //功能：对Excel文件进行新建、读写、内部数据行、列、单元格进行    //      查询，插入，替换等操作，对已有文件进行手工添加的也可以    //      正确读取等
C++ 保存Excel文件（带密码保护）
翻肚鱼儿的博客
08-20 999
最近有客户需求报表保存为xls的功能，需要保存的文件设置密码保护，特进行尝试！ Workbook.SaveAs method (Excel) 参数详情：https://docs.microsoft.com/en-us/office/vba/api/excel.workbook.saveas C++ Code 1 2 3 4 5 6 voidSaveAs(VARIANT&Filename,VARIANT&...
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值