EXCEL!(50分)

  • 主题发起人 主题发起人 小头鹰
  • 开始时间 开始时间

小头鹰

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么样在DELPHI程序中判断一个EXCEL表格中是否有某个RANGE范围?
 
在Excel中录一段宏来看一下,应该就可以找到相应的VBA写法了。
 
try
sss;=range(...)
ok:=true;
except
ok:=false;
end;
 
TO licby
听到VBA这个词 我都要变成大头鹰啦[:(][:)]
有没有简单点的?而且我也不知道怎么录制判断是否有RANGE的VBA [:(]
大哥能不能帮忙说清楚点?
或者拿段代码让我参考参考?
TO jsxjd:
sss 是什么类型?variant吗?
这种类型用起来的话很麻烦 [:(]
range(...) 又是怎么表示的?
在DELPHI中的话必须是用range[...] 而且必须指定他的工作表
麻烦兄弟给我再讲解讲解 [:)]
 
各位大虾没有热情了?[:(]

拿个新的:
怎么样才能正确无误的释放OLE变量?
每次用VARIANT变量连接EXCEL,但总是不能正确的释放,
重新连接的时候就发生OLE错误,要不就是RPC服务器不能用
哪位大哥如能指点一二,不胜感激!
 
你可以按照如下步骤退出EXCEL,下面的ExcelApp就是一个Variant变量,不需要另行释放。
//ExcelApp.ActiveWorkBook.Saved := True;
// 放弃存盘
ExcelApp.WorkBooks.Close;
//关闭工作簿
ExcelApp.Quit;
//退出 Excel
 

判断一个表各中是否存在一个RANGE :
var
I : Integer;
B : Integer;
.....
B := 0;
for K := 1 to ExcelApp.WorkBooks.Names.Countdo
begin
if ExcelApp.WorkBooks.Names.Item[K].Name = 'Range' then
B := B + 1;
end;

if B > 0 则有这个RANGE
if B = 0 则没有这个RANGE
 
接受答案了.
 
后退
顶部