问一个非常简单的问题,如何在打开Excel文件后,将其内容清空?(100分)

  • 主题发起人 主题发起人 wmwin
  • 开始时间 开始时间
W

wmwin

Unregistered / Unconfirmed
GUEST, unregistred user!
在下一次写数据之前,不希望看到有旧数据,另外,如何获得ole的excel编程方面的帮助?
 
2、这个目录
C:/Program Files/Microsoft Office/Office10/2052
里面有许多VBA*.chm文件,就是 VBA的帮助。
如果没有,到光盘上找或者添加Office帮助,里面的VBA帮助
 
这里:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=759711
 
能不能具体一点,说明使用什么帮助文件或使用什么函数?以上文件我也简单看过,好像
没有相关内容。谢谢!
 
是这样,vba的帮助就是作宏,再把它转化成delphi语言即可。这个可以看看以前的帖子。
 
MSDN

Office Developer Documentation
Office 2000 Documentation
Microsoft Office 2000 Language Reference
Microsoft Excel 2000 Reference
 
除了那个帖子,还有这个帖子,不过只要是探讨Word嵌入的。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=737517
其实两个里面不是简单的代码,我想主要应该理解这种思想,如何处理的方法。
具体到你的问题可以这样,录制一个宏,里面包含全部选中,然后删除的代码,
然后转换成Delphi代码就可以了。
 
用刪除刪掉
 
procedure TForm1.Button1Click(Sender: TObject);
begin
try app1.Connect;
except
messagedlg('系统没有安装WORD',mterror,[mbok],0);
abort;
end;
app1.Workbooks.Open('c:/temp/1.xls',emptyparam,false,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,1);
ework.ConnectTo(app1.workbooks[1]);
wsheet1.ConnectTo(ework.Sheets[1] as _worksheet);
wsheet1.Rows.Clear;
ework.Close(true);
app1.Disconnect;
end;
VBA里面到处有的是帮助。
 
后退
顶部