VS2010对Excel操作---DLL向

时间:2023-07-19 10:34:26

最近公司有个项目要用到Excel的操作,于是自己就对VC中关于Excel的操作进行整理了下。而这里我是直接做成DLL方便他人调用的。

  1. 创建一个MFC Dll项目。VS2010对Excel操作---DLL向

  2. 选择MFC扩展DLL。VS2010对Excel操作---DLL向
  3. 在“类视图”---“添加类”---在MFC中选择“TypeLib中的MFC类”,按如图所示选择,并添加对应的类VS2010对Excel操作---DLL向PS:由于我电脑上安装的是office2010,所以对应的Excel版本号是14.0,各位可以根据自己的情况选择。
  4. 删除这六个类的头文件中的第一句,如图,并将头文件添加到“stdafx.h"中VS2010对Excel操作---DLL向VS2010对Excel操作---DLL向
  5. 修改字符集,vs2010默认生成的是使用unicode字符集,这里我们把它修改为”使用多字节字符集“,这样能避免很多不必要的麻烦。VS2010对Excel操作---DLL向
  6. 接下来进行编译,正常情况下会出现如下错误:VS2010对Excel操作---DLL向这时候定位到警告处,在函数名之前加上下划线就OK了。如图:VS2010对Excel操作---DLL向这样编译就没什么问题了。
  7. 接下就是直接添加导出函数来,这里我偷个懒直接到dllmain.cpp这个文件里面加了,大家可以根据自己的习惯来。

     extern "C" _declspec(dllexport) void ReadExcel(const CString& strPath,const CString& strFlag, const vector<CString>& vTarget,vector<CString>& vOutTarget)
    {
    CApplication _app;
    CWorkbook _book;
    CWorkbooks _books; CWorksheet _sheet;
    CWorksheets _sheets;
    CRange _rang; if (!_app.CreateDispatch(_T("Excel.Application")))
    {
    MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR);
    exit();
    }
    _books = _app.get_Workbooks();
    _book = _books.Add(_variant_t(strPath)); _sheets = _book.get_Worksheets();
    _sheet = _sheets.get_Item(_variant_t("电力电缆井")); //获取行列数
    CRange _usedRang;
    _usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE);
    _rang.AttachDispatch(_usedRang.get_Columns(),TRUE);
    long nColumn = _rang.get_Count();//列
    _rang.ReleaseDispatch();
    _rang.AttachDispatch(_usedRang.get_Rows(),TRUE);
    long nRow = _rang.get_Count();//行
    _rang.ReleaseDispatch();
    _usedRang.ReleaseDispatch();
    //遍历
    _rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格
    CString str;
    long nCurRow = ;
    long nCurColumn = ;
    //获取关键字所在的行列号
    for (long i = ; i <= nRow; ++i)
    {
    for (long j = ; j <= nColumn; ++j)
    {
    CRange _currentRang;
    _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE);
    COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
    {
    str = vResult.bstrVal;
    }
    else if (VT_INT==vResult.vt)
    {
    str.Format(_T("%d"),vResult.pintVal);
    }
    else if (VT_R8==vResult.vt)//8字节数字
    {
    str.Format(_T("%f"),vResult.dblVal);
    }
    else if (VT_DATE==vResult.vt)//时间格式
    {
    SYSTEMTIME st;
    VariantTimeToSystemTime(vResult.date,&st);
    }
    else if (VT_EMPTY==vResult.vt)//空单元格
    {
    str = "(NULL)";
    }
    _currentRang.ReleaseDispatch();
    if (strFlag==str)//直接使用goto语句跳出双重循环
    {
    nCurRow = i;
    nCurColumn = j;
    goto LOOPOUT;
    }
    }
    } LOOPOUT:
    vector<long> vNTarget;//目标列所在的列号
    for (long i = ;i <= nColumn;++i)
    {
    CRange _currentRang;
    _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)),COleVariant((long)i)).pdispVal,TRUE);
    COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
    {
    str = vResult.bstrVal;
    }
    else if (VT_INT==vResult.vt)
    {
    str.Format(_T("%d"),vResult.pintVal);
    }
    else if (VT_R8==vResult.vt)//8字节数字
    {
    str.Format(_T("%f"),vResult.dblVal);
    }
    else if (VT_DATE==vResult.vt)//时间格式
    {
    SYSTEMTIME st;
    VariantTimeToSystemTime(vResult.date,&st);
    }
    else if (VT_EMPTY==vResult.vt)//空单元格
    {
    str = "(NULL)";
    }
    _currentRang.ReleaseDispatch();
    //对取出来的str和目标str进行配对
    for (vector<CString>::size_type j = ;j != vTarget.size(); ++j)
    {
    if (vTarget.at(j)==str)
    {
    vNTarget.push_back(i);
    break;
    }
    }
    }
    //接下来根据获取的行号nCurRow和列号vNTarget来读取指定内容
    for (vector<CString>::size_type i = ; i != vTarget.size(); ++i)
    {
    CRange _currentRang;
    _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)nCurRow),COleVariant((long)vNTarget.at(i))).pdispVal,TRUE);
    COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
    {
    str = vResult.bstrVal;
    }
    else if (VT_INT==vResult.vt)
    {
    str.Format(_T("%d"),vResult.pintVal);
    }
    else if (VT_R8==vResult.vt)//8字节数字
    {
    str.Format(_T("%f"),vResult.dblVal);
    }
    else if (VT_DATE==vResult.vt)//时间格式
    {
    SYSTEMTIME st;
    VariantTimeToSystemTime(vResult.date,&st);
    }
    else if (VT_EMPTY==vResult.vt)//空单元格
    {
    str = "(NULL)";
    }
    _currentRang.ReleaseDispatch();
    vOutTarget.push_back(str);
    } _book.ReleaseDispatch();
    _books.ReleaseDispatch();
    151 _app.Quit();
     _app.ReleaseDispatch();
     }
    上述函数就是打开路径strPath的Excel文件,并通过标志符strFlag找到要读取的行,通过vTarget找到要读取的列,将读取的内容输出到vOutTarget中。这里我是默认表格的第一行就是存放的表头,大家可以根据自己的实际情况进行调整。
  8. 接下来再添加一个关于更新(即写某个单元格的函数)
     extern "C" _declspec(dllexport) void UpdateExcel(const CString& strPath,const CString& strFlag,const vector<CString>& vTarget,const vector<CString>& vInTarget)
    {
    CApplication _app;
    CWorkbook _book;
    CWorkbooks _books; CWorksheet _sheet;
    CWorksheets _sheets;
    CRange _rang; if (!_app.CreateDispatch(_T("Excel.Application")))
    {
    MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR);
    exit();
    }
    _books = _app.get_Workbooks();
    _book = _books.Add(_variant_t(strPath)); _sheets = _book.get_Worksheets();
    _sheet = _sheets.get_Item(_variant_t("电力电缆井")); //获取行列数
    CRange _usedRang;
    _usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE);
    _rang.AttachDispatch(_usedRang.get_Columns(),TRUE);
    long nColumn = _rang.get_Count();//列
    _rang.ReleaseDispatch();
    _rang.AttachDispatch(_usedRang.get_Rows(),TRUE);
    long nRow = _rang.get_Count();//行
    _rang.ReleaseDispatch();
    _usedRang.ReleaseDispatch();
    //遍历
    _rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格
    CString str;
    long nCurRow = ;
    long nCurColumn = ;
    //获取关键字所在的行列号
    for (long i = ; i <= nRow; ++i)
    {
    for (long j = ; j <= nColumn; ++j)
    {
    CRange _currentRang;
    _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE);
    COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
    {
    str = vResult.bstrVal;
    }
    else if (VT_INT==vResult.vt)
    {
    str.Format(_T("%d"),vResult.pintVal);
    }
    else if (VT_R8==vResult.vt)//8字节数字
    {
    str.Format(_T("%f"),vResult.dblVal);
    }
    else if (VT_DATE==vResult.vt)//时间格式
    {
    SYSTEMTIME st;
    VariantTimeToSystemTime(vResult.date,&st);
    }
    else if (VT_EMPTY==vResult.vt)//空单元格
    {
    str = "(NULL)";
    }
    _currentRang.ReleaseDispatch();
    if (strFlag==str)//直接使用goto语句跳出双重循环
    {
    nCurRow = i;
    nCurColumn = j;
    goto LOOPOUT;
    }
    }
    } LOOPOUT:
    vector<long> vNTarget;//目标列所在的列号
    for (long i = ;i <= nColumn;++i)
    {
    CRange _currentRang;
    _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)),COleVariant((long)i)).pdispVal,TRUE);
    COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
    {
    str = vResult.bstrVal;
    }
    else if (VT_INT==vResult.vt)
    {
    str.Format(_T("%d"),vResult.pintVal);
    }
    else if (VT_R8==vResult.vt)//8字节数字
    {
    str.Format(_T("%f"),vResult.dblVal);
    }
    else if (VT_DATE==vResult.vt)//时间格式
    {
    SYSTEMTIME st;
    VariantTimeToSystemTime(vResult.date,&st);
    }
    else if (VT_EMPTY==vResult.vt)//空单元格
    {
    str = "(NULL)";
    }
    _currentRang.ReleaseDispatch();
    //对取出来的str和目标str进行配对
    for (vector<CString>::size_type j = ;j != vTarget.size(); ++j)
    {
    if (vTarget.at(j)==str)
    {
    vNTarget.push_back(i);
    break;
    }
    }
    }
    //更新指定的单元格
    for (vector<CString>::size_type i = ; i != vInTarget.size(); ++i)
    {
    _rang.put_Item(COleVariant(nCurRow),COleVariant(vNTarget.at(i)),COleVariant(vInTarget.at(i)));
    }
     _book.SaveCopyAs(COleVariant(strPath));
    _book.put_Saved(TRUE);
    _app.put_Visible(FALSE);
    _book.ReleaseDispatch();
    _books.ReleaseDispatch(); _app.Quit()
    _app.ReleaseDispatch();
     }
    参数的设置和上一个函数差不多。
  9. 接下来编译的时候,正常情况下会有一点小问题。这个问题如果你是基于对话框的MFC程序貌似是不会出现的,只有创建DLL或者ActiveX控件才会出现。VS2010对Excel操作---DLL向这个问题也是烦恼了我好久,解决方法是先在文件头导入一个libVS2010对Excel操作---DLL向在编译,运气好的话就没什么问题了。运气不好还会出下如下问题。VS2010对Excel操作---DLL向这个时候我们修改下项目属性VS2010对Excel操作---DLL向把我标出来的选项改为否应该就没什么问题了。
  10. 最后编译完成通过。这样dll和lib就都生成好了,大家可以尽情的使用了。
  11. 差不多就这样了,至于其他的问题,比如如果直接创建的是基于对话框的MFc程序的话就更简单了。跟着步骤走就完事了。最后我是一个菜鸟,如果有什么问题也欢迎大家指教。