社区
ATL
帖子详情
如何将CListCtrl中的数据导出至Excel
wangjs720
2009-10-26 05:40:10
如题
...全文
113
6
打赏
收藏
如何将CListCtrl中的数据导出至Excel
如题
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
蒋晟
2009-10-27
打赏
举报
回复
为什么要从listcontrol里面取呢?往listcontrol里面加项目的时候自己做一个数据备份就好了
dirdirdir3
2009-10-26
打赏
举报
回复
直接用ADO访问数据库形式访问excel.
http://www.cnblogs.com/sensizhe/archive/2009/04/01/1427362.html
zyq5945
2009-10-26
打赏
举报
回复
这个只能1楼的和用读取数据库方式的方法下把CListCtrl里内容写入到excel中。
1楼的方法对excel版本依赖性有点高
个人感觉用数据库方式好一点。
xmrforever
2009-10-26
打赏
举报
回复
mark
allenhiman
2009-10-26
打赏
举报
回复
留名
jeff_5388
2009-10-26
打赏
举报
回复
#import "C:\\Program Files\\Common Files\\Microsoft Shared\\OFFICE11\\MSO.DLL" rename( "RGB", "MSORGB" )
using namespace Office;
#pragma warning(disable : 4192)
#import "C:\\Program Files\\Common Files\\Microsoft Shared\\VBA\\VBA6\\VBE6EXT.OLB"
#import "D:\\Program Files\\Microsoft Office\\OFFICE11\\EXCEL.EXE" \
rename( "DialogBox", "ExcelDialogBox" ) \
rename( "RGB", "ExcelRGB" ) \
rename( "CopyFile", "ExcelCopyFile" ) \
rename( "ReplaceText", "ExcelReplaceText" )
void CRecordView::OnFileExport()
{
TCHAR szFilter[] = { _T("Excel文件 (*.xls)|*.xls|所有文件 (*.*)|*.*||") };
CFileDialog SaveDialog(FALSE, NULL, NULL, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, szFilter);
if (SaveDialog.DoModal() == IDOK)
{
_variant_t varOption((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
CWaitCursor wait;
try
{
Excel::_ApplicationPtr pExcelApp(_T("Excel.Application"));
Excel::_WorkbookPtr pBook = pExcelApp->Workbooks->Add(varOption);
Excel::_WorksheetPtr pSheet = pBook->ActiveSheet;
//Excel::RangePtr pRange = pSheet->GetRange(_T("A1"), _T("D1"));
Excel::RangePtr pRange = pSheet->Cells;
CHeaderCtrl* pHeader = m_wndList.GetHeaderCtrl();
int nColumn = pHeader->GetItemCount();
{
TCHAR szText[40] = { 0 };
HDITEM hdi = { 0 };
hdi.mask = HDI_TEXT;
hdi.pszText = szText;
hdi.cchTextMax = 40;
for (int i = 1; i < nColumn; i++)
{
pHeader->GetItem(i, &hdi);
pRange->Item[1][i] = hdi.pszText;
}
Excel::RangePtr pHeaderRange = pRange->GetRange(variant_t(_T("A1")), variant_t(_T("F1")));
pHeaderRange->Font->Bold = true;
}
for (int i = 0; i < m_wndList.GetItemCount(); i++)
{
for (int j = 1; j < nColumn; j++)
{
pRange->Item[i+2][j] = (LPCTSTR)m_wndList.GetItemText(i, j);
}
}
pRange = pRange->EntireColumn;
pRange->AutoFit();
pBook->Close(true, (LPCTSTR)SaveDialog.GetPathName(), varOption);
pExcelApp->Quit();
AfxMessageBox(_T("数据已成功导出到Excel表格中!"), MB_OK | MB_ICONINFORMATION);
}
catch (...)
{
AfxMessageBox(_T("导出数据错误!"), MB_OK | MB_ICONERROR);
return;
}
}
}
CLi
stctrl
中
数据
导入到
excel
中
CLi
stctrl
导出
数据
到
excel
类,简单实用
VC
导出
CLi
stCtrl
数据
到
Excel
两种方法
VC
导出
CLi
stCtrl
数据
到
Excel
两种方法
将listcontrl控件里的
数据
导出
到
excel
表格里
这个类可以将listcontrol控件里面的
数据
导出
到
excel
表格里 包括
数据
的列名 资源来源于网上 希望可以帮助到有需要的同志
excel
,
cli
stctrl
和
数据
库之间,导入
导出
表格
其
中
,ado需要改变connect
中
数据
库的password,
将
Excel
中
的
数据
导入到MFC List Control
中
将
Excel
中
的
数据
导入到MFC List Control
中
,直接调用压缩文件
中
的CSpreadSheet.cpp 和 CSpreadSheet.h文件即可
ATL
3,245
社区成员
48,539
社区内容
发帖
与我相关
我的任务
ATL
ATL,Active Template Library活动(动态)模板库,是一种微软程序库,支持利用C++语言编写ASP代码以及其它ActiveX程序。
复制链接
扫一扫
分享
社区描述
ATL,Active Template Library活动(动态)模板库,是一种微软程序库,支持利用C++语言编写ASP代码以及其它ActiveX程序。
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章