如何利用VC++自动生成Excel表格

Posted 2023-05-04

参考技术A

先创建一个对话框工程，命名为VCExcel。在对话框中添加一个按钮，控件ID为ID_RUNEXCEL，再在该按钮上添加消息BN_CLICKED，其消息映射函数为OnRunexcel()，我们要编程输出一个如下表格。 

格式如下： 

     1、表头的字体为宋体，加粗，颜色为白色，底色为深蓝，垂直水平居中对齐； 

     2、表中正文内容字体为宋体，颜色为深蓝，底色为灰色，垂直水平居中对齐；   

     3、全部边框，文本自动换行。 

在BOOL CVCExcelApp::InitInstance()之中，int nResponse = dlg.DoModal()语句之后加入如下代码： 

if(CoInitialize(NULL)==0)//初始化COM库 

        

              AfxMessageBox("初始化COM失败!"); 

              exit(1); 

        

在return FALSE;语句之前加入：::CoUninitialize();//释放COM库。 

    为了能调用Excel的接口我们打开MFC ClassWizard->Automation->Add Class->From a type library，选择[Excel的安装路径]\\EXCEL.exe，然后把所有的类都添加进去，头文件为excel.h，源文件为excel.cpp。当然，你也可以只把一些比较常用的类如_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range加进去，因为网上流传的绝大部分教程都只添加这几个类，这完全根据你个人的需要。但在本例中我们至少还要用到Interior类（设置底色），Font类（设置字体），而且这样做又简单又方便扩展功能，不管三七二十一全部弄进去吧！但这样做会有一个问题，有可能产生类的名字冲突，例如本来你自己写了一个类叫Font，当你全部添加时又再次加入了Font类，这样就重复定义了，不过可以通过名字空间来解决这个问题。再在VCExcelDlg.cpp文件的头部添加（如果系统已经自动添加就不要重复添加了）： 

#include "VCExcel.h" 

#include "comdef.h" 

这样一来我们的程序就可以自由调用EXCEL了，一切准备就绪。 

   下面先在CVCExcelDlg中添加如下成员变量，用来操控Excel应用程序、工作簿和单元格。 

       Range m_ExlRge; 

       _Worksheet m_ExlSheet; 

       Worksheets m_ExlSheets; 

       _Workbook m_ExlBook; 

       Workbooks m_ExlBooks; 

       _Application m_ExlApp; 

我们利用加载Excel模板来生成要求的表格，在本工程Debug文件夹中建立一个Excel文件，命名为Template.xls。我们的OnRunexcel()代码如下（详见注释）： 

void CVCExcelDlg::OnRunexcel() 

 

       // TODO: Add your control notification handler code here 

       //用m_ExlApp对象创建Excel2003进程 

       if(!m_ExlApp.CreateDispatch("Excel.Application",NULL)) 

        

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

              return; 

        

       //设置为可见 

       m_ExlApp.SetVisible(TRUE); 

       ///////////////////下面得到应用程序所在的路径/////////////////// 

       CString theAppPath,theAppName; 

       char Path[MAX_PATH]; 

       GetModuleFileName(NULL,Path,MAX_PATH);//得到应用程序的全路径 

       theAppPath=(CString)Path; 

       theAppName=AfxGetApp()->m_pszAppName; 

       theAppName+=".exe"; 

       //把最后的文件名去掉 

       int length1,length2; 

       length1=theAppPath.GetLength(); 

       length2=theAppName.GetLength(); 

       theAppPath.Delete(length1-length2,length2); 

    //////////////////////////////////////////////////////////////// 

       CString TempPath=""; 

       TempPath=theAppPath+"Template.xls";//EXCEL模板的路径 

       m_ExlBooks.AttachDispatch(m_ExlApp.GetWorkbooks(),TRUE); 

       m_ExlBook.AttachDispatch(m_ExlBooks.Add((_variant_t)TempPath),TRUE);//加载EXCEL模板 

       m_ExlSheets.AttachDispatch(m_ExlBook.GetSheets(),TRUE);//加载Sheet页面 

       //添加新的Sheet页面 

       m_ExlSheets.Add(vtMissing,vtMissing,_variant_t((long)1),vtMissing); 

       //删除第二个Sheet页面 

       m_ExlSheet.AttachDispatch(m_ExlSheets.GetItem(_variant_t((long)2)),TRUE); 

       m_ExlSheet.Delete(); 

       //把第一个Sheet页面的名字改变为TestSheet 

       m_ExlSheet.AttachDispatch(m_ExlSheets.GetItem(_variant_t((long)1)),TRUE); 

       m_ExlSheet.SetName("TestSheet"); 

       ///////合并第一行单元格A1至D1////// 

       //加载要合并的单元格 

       m_ExlRge.AttachDispatch(m_ExlSheet.GetRange(_variant_t("A1"),_variant_t("D1")),TRUE); 

       m_ExlRge.Merge(_variant_t((long)0)); 

       ////////设置表格内容//////// 

       m_ExlRge.AttachDispatch(m_ExlSheet.GetCells(),TRUE);//加载所有单元格 

       m_ExlRge.SetItem(_variant_t((long)1),_variant_t((long)1),_variant_t("数学系研究生课程统计")); 

       m_ExlRge.SetItem(_variant_t((long)2),_variant_t((long)1),_variant_t("课程名")); 

       m_ExlRge.SetItem(_variant_t((long)2),_variant_t((long)2),_variant_t("课时")); 

       m_ExlRge.SetItem(_variant_t((long)2),_variant_t((long)3),_variant_t("难度")); 

       m_ExlRge.SetItem(_variant_t((long)2),_variant_t((long)4),_variant_t("教学方式")); 

       m_ExlRge.SetItem(_variant_t((long)3),_variant_t((long)1),_variant_t("泛函分析")); 

       m_ExlRge.SetItem(_variant_t((long)3),_variant_t((long)2),_variant_t("60")); 

       m_ExlRge.SetItem(_variant_t((long)3),_variant_t((long)3),_variant_t("普通")); 

       m_ExlRge.SetItem(_variant_t((long)3),_variant_t((long)4),_variant_t("老师讲课")); 

       m_ExlRge.SetItem(_variant_t((long)4),_variant_t((long)1),_variant_t("微分流形")); 

       m_ExlRge.SetItem(_variant_t((long)4),_variant_t((long)2),_variant_t("40")); 

       m_ExlRge.SetItem(_variant_t((long)4),_variant_t((long)3),_variant_t("变态难")); 

       m_ExlRge.SetItem(_variant_t((long)4),_variant_t((long)4),_variant_t("自学")); 

       m_ExlRge.SetItem(_variant_t((long)5),_variant_t((long)1),_variant_t("二阶椭圆型方程与方程组")); 

       m_ExlRge.SetItem(_variant_t((long)5),_variant_t((long)2),_variant_t("60")); 

       m_ExlRge.SetItem(_variant_t((long)5),_variant_t((long)3),_variant_t("很难")); 

       m_ExlRge.SetItem(_variant_t((long)5),_variant_t((long)4),_variant_t("讨论")); 

       m_ExlRge.AttachDispatch(m_ExlSheet.GetUsedRange());//加载已使用的单元格 

       m_ExlRge.SetWrapText(_variant_t((long)1));//设置单元格内的文本为自动换行 

       //设置齐方式为水平垂直居中 

       //水平对齐：默认＝1,居中＝-4108,左＝-4131,右＝-4152 

       //垂直对齐：默认＝2,居中＝-4108,左＝-4160,右＝-4107 

       m_ExlRge.SetHorizontalAlignment(_variant_t((long)-4108)); 

       m_ExlRge.SetVerticalAlignment(_variant_t((long)-4108)); 

       ///////设置整体的字体、字号及颜色////// 

       Font ft; 

       ft.AttachDispatch(m_ExlRge.GetFont()); 

       ft.SetName(_variant_t("宋体"));//字体 

       ft.SetColorIndex(_variant_t((long)11));//字的颜色 

       ft.SetSize(_variant_t((long)12));//字号 

       ///////////设置标题字体及颜色////////// 

       m_ExlRge.AttachDispatch(m_ExlSheet.GetRange(_variant_t("A1"),_variant_t("D1"))); 

       ft.AttachDispatch(m_ExlRge.GetFont()); 

       ft.SetBold(_variant_t((long)1));//粗体 

       ft.SetSize(_variant_t((long)13)); 

       ft.SetColorIndex(_variant_t((long)2)); 

       CellFormat cf; 

       cf.AttachDispatch(m_ExlRge.GetCells()); 

       //////////////设置底色///////////////// 

       Interior it; 

       it.AttachDispatch(m_ExlRge.GetInterior()); 

       it.SetColorIndex(_variant_t((long)11));//标题底色 

       ////表格内容的底色//// 

       m_ExlRge.AttachDispatch(m_ExlSheet.GetRange(_variant_t("A2"),_variant_t("D5"))); 

       it.AttachDispatch(m_ExlRge.GetInterior()); 

       it.SetColorIndex(_variant_t((long)15)); 

       //////////////为表格设置边框///////////// 

       Range UnitRge; 

       CString CellName; 

       for(int i=1;i<=4;i++) 

        

              for(int j=1;j<=4;j++) 

                   

                     CellName.Format("%c%d",j+64,i);//单元格的名称 

                     UnitRge.AttachDispatch(m_ExlRge.GetRange(_variant_t(CellName),_variant_t(CellName)));//加载单元格 

                     //LineStyle=线型 Weight=线宽 ColorIndex=线的颜色(-4105为自动) 

                     UnitRge.BorderAround(_variant_t((long)1),_variant_t((long)2),_variant_t((long)-4105),vtMissing);//设置边框 

               

        

       //释放对象（相当重要！） 

       m_ExlRge.ReleaseDispatch(); 

       m_ExlSheet.ReleaseDispatch(); 

       m_ExlSheets.ReleaseDispatch(); 

       m_ExlBook.ReleaseDispatch(); 

       m_ExlBooks.ReleaseDispatch(); 

       //m_ExlApp一定要释放，否则程序结束后还会有一个Excel进程驻留在内存中，而且程序重复运行的时候会出错 

       m_ExlApp.ReleaseDispatch(); 

       //退出程序 m_ExlApp.Quit(); 

本回答被提问者和网友采纳

请教VC++高手 如何输出高精度时间差

分别取程序的起止时间，做差，得到以秒为单位的时间差
但精度还不够，我想将这个时间差精度到0.0001秒，请问可以实现吗？
具体应该怎么做？谢谢

VC时间控制函数就这几类找了一个总结文章

一般时控函数

VC程序员都会利用Windows的WM—TIMER消息映射来进行简单的时间控制：1.调用函数SetTimer()设置定时间隔，如SetTimer(0,200,NULL)即为设置200毫秒的时间间隔；2.在应用程序中增加定时响应函数OnTimer()，并在该函数中添加响应的处理语句，用来完成时间到时的操作。这种定时方法是非常简单的，但其定时功能如同Sleep()函数的延时功能一样，精度较低，只可以用来实现诸如位图的动态显示等对定时精度要求不高的情况，而在精度要求较高的条件下，这种方法应避免采用。

精度时控函数

在要求误差不大于1毫秒的情况下，可以采用GetTickCount()函数，该函数的返回值是DWORD型，表示以毫秒为单位的计算机启动后经历的时间间隔。使用下面的编程语句，可以实现50毫秒的精确定时，其误差小于1毫秒。

DWORD dwStart, dwStop;

// 起始值和终止值

dwStop = GetTickCount();

while(TRUE)



dwStart = dwStop;

// 上一次的终止值变成新的起始值

// 此处添加相应控制语句

do



dwStop = GetTickCount();

while(dwStop － 50 < dwStart);



高精度时控函数

对于一般的实时控制，使用GetTickCount()函数就可以满足精度要求，但要进一步提高计时精度，就要采用QueryPerformanceFrequency()函数和QueryPerformanceCounter()函数。这两个函数是VC提供的仅供Windows 9X使用的高精度时间函数，并要求计算机从硬件上支持高精度计时器。QueryPerformanceFrequency()函数和QueryPerformanceCounter()函数的原型为：

BOOL QueryPerformanceFrequency(LARGE—INTEGER ＊lpFrequency);

BOOL QueryPerformanceCounter(LARGE—INTEGER ＊lpCount) ;

数据类型LARGE—INTEGER既可以是一个作为8字节长的整型数，也可以是作为两个4字节长的整型数的联合结构，其具体用法根据编译器是否支持64位而定。该类型的定义如下：

typedef union —LARGE—INTEGER



struct



DWORD LowPart; // 4字节整型数

LONG HighPart; // 4字节整型数

;

LONGLONG QuadPart;

// 8字节整型数

LARGE—INTEGER;

在进行计时之前，应该先调用QueryPerformanceFrequency()函数获得机器内部计时器的时钟频率。笔者在主频为266、300、333的三种PentiumⅡ机器上使用该函数，得到的时钟频率都是1193180Hz。接着，笔者在需要严格计时的事件发生之前和发生之后分别调用QueryPerformanceCounter()函数，利用两次获得的计数之差和时钟频率，就可以计算出事件经历的精确时间。以下程序是用来测试函数Sleep(100)的精确持续时间。

LARGE—INTEGER litmp;

LONGLONG QPart1,QPart2;

double dfMinus, dfFreq, dfTim;

QueryPerformanceFrequency(＆litmp);

// 获得计数器的时钟频率

dfFreq = (double)litmp.QuadPart;

QueryPerformanceCounter(＆litmp);

// 获得初始值

QPart1 = litmp.QuadPart;

Sleep(100) ;

QueryPerformanceCounter(＆litmp);

// 获得终止值

QPart2 = litmp.QuadPart;

dfMinus = (double)(QPart2 － QPart1);

dfTim = dfMinus / dfFreq;

// 获得对应的时间值

执行上面程序，得到的结果为dfTim=0.097143767076216(秒)。细心的读者会发现，每次执行的结果都不一样，存在一定的差别，这是由于Sleep()自身的误差所致。

本文介绍了三种定时或计时的实现方法，读者可以根据自己的实际情况进行选择，以达到程序的定时和计时功能。以上程序均在VC 6.0、Windows 98环境下调试通过。 参考技术A LARGE_INTEGER litmp ;
LONGLONG QPart,QPart1,QPart2 ;

//获得CPU每秒嘀哒声数量
QueryPerformanceFrequency(&litmp);
QPart = litmp.QuadPart ;

//获得开始时CPU嘀哒声
QueryPerformanceCounter(&litmp) ;
QPart1 = litmp.QuadPart ;

Sleep(1);

//获得结束时CPU嘀哒声
QueryPerformanceCounter(&litmp) ;
QPart2 = litmp.QuadPart ;

//计算时间差
double time = (double)(QPart2-QPart1)/(double)QPart; 参考技术B 可以用CTimeSpan,也可以用COleDateTimeSpan

http://hi.baidu.com/bellgrade/blog/item/8bf9e7eb6bdcd0d5d539c903.html 参考技术C 晕了,想钱想疯了也就算了,百度的分数也嫌多嫌少的,开了眼了.
楼主到MSDN里看下这两个函数:
BOOL QueryPerformanceFrequency(LARGE_INTEGER* lpFrequency);
BOOL QueryPerformanceCounter(LARGE_INTEGER* lpPerformanceCount);
另外给你个实现类:
class CStopwatch
public:
CStopwatch() QueryPerformanceFrequency(&m_liPerfFreq); Start();
void Start() QueryPerformanceCounter(&m_liPerfStart);
__int64 Now() const
LARGE_INTEGER liPerfNow;
QueryPerformanceCounter(&liPerfNow);
return (((liPerfNow.QuadPart - m_liPerfStart.QuadPart) * 1000) / m_liPerfFreq.QuadPart);

private:
LARGE_INTEGER m_liPerfFreq;
LARGE_INTEGER m_liPerfStart;
;
在Now函数里，有个乘数是1000，目的是让Now返回的时间为毫秒。
使用：
CStopwatch stopwatch;
//do the work that would take long time;
__int64 qwElapsedTime = stopwatch.Now();
//qwElapsedTime indicates how long the work has spent;
注意，因为是高精度时间，因此，你要做的工作应该是短期内能完成的工作，时间太长，误差会特别大，因为线程有占用时间片的因素存在。本回答被提问者采纳 参考技术D 多媒体定时器