VC6.0实现读取Excel数据的方法资源-CSDN文库

117 浏览量 2020-09-04 08:23:39 上传评论 1 收藏 47KB PDF 举报

资源推荐

资源详情

资源评论

VC6.0实现读取实现读取Excel数据的方法数据的方法

主要介绍了VC6.0实现读取Excel数据的方法,非常实用的功能,需要的朋友可以参考下

Excel是常用的办公软件之一，本文以Excel2003为例说明VC程序读取Excel文件的方法。具体步骤如下：

1.首先要将首先要将excel类添加到工程中。类添加到工程中。

在ClassWizard中，【Add Class】，在Excel的安装目录找到Excel.exe（Microsoft2003是Excel.exe；2007应该又独立的lib

库，这个没有验证），添加必要的几个类：

// Excel应用对象

_Application m_oExcelApp; // Excel程序

_Worksheet m_oWorkSheet; // 工作表

_Workbook m_oWorkBook; // 工作簿

Workbooks m_oWorkBooks; // 工作簿集合

Worksheets m_oWorkSheets; // 工作表集合

Range m_oCurrRange; // 使用区域

添加到工程中的文件是excel.h和excel.cpp。

2.初始化初始化Com库库

if (CoInitialize(NULL)!=0)

{

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

exit(1);

}

3.读取文件中的数据读取文件中的数据

if (!m_oExcelApp.CreateDispatch( _T( "Excel.Application" ), NULL ) )

{

::MessageBox( NULL, _T( "创建Excel服务失败！" ), _T( "错误提示！" ), MB_OK | MB_ICONERROR);

exit(1);

}

//设置为显示

m_oExcelApp.SetVisible(FALSE);

m_oWorkBooks.AttachDispatch( m_oExcelApp.GetWorkbooks(), TRUE ); //没有这条语句，下面打开文件返回失败。

LPDISPATCH lpDisp = NULL;

COleVariant covTrue((short)TRUE);

COleVariant covFalse((short)FALSE);

COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

Range oCurCell;

// 打开文件

lpDisp = m_oWorkBooks.Open( strFilePath,

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing),

_variant_t(vtMissing) );

// 获得活动的WorkBook( 工作簿 )

m_oWorkBook.AttachDispatch( lpDisp, TRUE );

// 获得活动的WorkSheet( 工作表 )

m_oWorkSheet.AttachDispatch( m_oWorkBook.GetActiveSheet(), TRUE );

// 获得使用的区域Range( 区域 )

m_oCurrRange.AttachDispatch( m_oWorkSheet.GetUsedRange(), TRUE );

// 获得使用的行数

long lgUsedRowNum = 0;

m_oCurrRange.AttachDispatch( m_oCurrRange.GetRows(), TRUE );

lgUsedRowNum = m_oCurrRange.GetCount();

// 获得使用的列数

long lgUsedColumnNum = 0;

m_oCurrRange.AttachDispatch( m_oCurrRange.GetColumns(), TRUE );

本内容试读结束，登录后可阅读更多

下载后可阅读完整内容，剩余1页未读，立即下载

内容反馈

weixin_38618521

粉丝: 8
资源: 916

最新资源

资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！点击此处反馈

feedback-tip