请高手赐教,急.....

peach1225617 2004-03-31 07:22:46
我在DELPHI中用下面的语句对EXCEL中的表进行COPY:

excelapp.activesheet.used.range.copy;

可是当运行到这一句时,提示以下错误信息:
"Variant does not reference an automation object"

请高手赐教,这是什么原因?
...全文
33 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
hhzh426 2004-04-01
  • 打赏
  • 举报
回复
excelapp.activesheet.range.used.copy,是不是需要写一点儿代码来选择一些内容,然后再copy?
sdlzlj 2004-04-01
  • 打赏
  • 举报
回复
全部代码?
peach1225617 2004-04-01
  • 打赏
  • 举报
回复
唉,看来是没人愿意帮小妹了,呜呜。。。。。。。
peach1225617 2004-03-31
  • 打赏
  • 举报
回复
j:=excelapp.worksheets.count;
excelapp.worksheets[j].activate;
//excelapp.activesheet.Columns[1].Width :=200;
worksheetname:=excelapp.worksheets[j].name;
excelapp.cells[1,1]:=' _Day Shift Top10 Report';
excelapp.cells[2,2]:=worksheetname;
excelapp.cells[3,3]:='08:00:00'+'~'+'20:00:00';
excelapp.cells[3,5]:=datetimetostr(date);
//excelapp.activesheet.range.used.copy;
代码如上,其中被我注释掉的两行,就是会提示出错的地方,且错误提示是一样的.别的地方都没问题.我实在是不知道怎么回事了?
aiirii 2004-03-31
  • 打赏
  • 举报
回复
这句操作是没有问题的, 可能你别的代码有问题
hwz_119 2004-03-31
  • 打赏
  • 举报
回复
关注

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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