高分请excel的高手进来!

magelfly 2003-08-22 06:16:43
我用应有程序写的输出excel;输出都没有问题,我没有用到录制宏,我不熟!
问题时:应用程序采用的时ex24d(vc技术内幕)的例子,化表格,一条线一条线化的。程序执行时,第一次可以看到化的过程,excel的工具条没有了,但是下几次都不能看到excel的工作区显示,华完后,保存在打开,才能看到化的效果!
请问有没有画的更快的方法,能见excel显示的!
谢谢
有答案一定给分!
...全文
78 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
magelfly 2003-08-22
  • 打赏
  • 举报
回复
启动时用的这个

CWnd* pWnd = CWnd::FindWindow("XLMAIN", NULL);
if (pWnd != NULL) {
TRACE("Excel window found\n");
pWnd->ShowWindow(SW_SHOWMAXIMIZED);
pWnd->UpdateWindow();
pWnd->BringWindowToTop();
}
m_App.SetSheetsInNewWorkbook(1);
VERIFY(pWorkbooks = m_App.GetWorkbooks());
m_Workbooks.AttachDispatch(pWorkbooks);

LPDISPATCH pWorkbook = NULL;
if (m_Workbooks.GetCount() == 0) {
// Add returns a Workbook pointer, but we
// don't have a Workbook class
pWorkbook = m_Workbooks.Add(); // Save the pointer for
// later release
}
LPDISPATCH pWorksheets = m_App.GetWorksheets();
magelfly 2003-08-22
  • 打赏
  • 举报
回复
我写的原理时和你一样的!
但是执行很慢!vba的那种时怎么回事
magelfly 2003-08-22
  • 打赏
  • 举报
回复
gzshd(郁闷) :
启动时;出现白色、你在吗? 和你讨论一下
gzshd 2003-08-22
  • 打赏
  • 举报
回复

//将EXCEL单元格加上边框
CString pos;
//访问每一行,为每一行都加上边框
for(int ii=1;ii<count+2;ii++)
{
CString tmp,tmp2;
char tt='A'+lNumCols-1;
//构造访问区域定义:如“A1:I1”
tmp.Format("A%d:%c%d",ii,tt,ii);
tmp2+=tmp;
//得到整行的区域
oRange = oSheet.GetRange(COleVariant(tmp2), vOpt);
Borders b=oRange.GetBorders();
//设置边框线型
b.SetLineStyle(COleVariant((short)1));
}

4,011

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC 数据库
社区管理员
  • 数据库
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧