excel取值错误问题(100分)

woshiyaya · 2008-03-20

下列语句通过编译，不能运行正常，提示找不到对象
if excel1.ActiveSheet.Range('B1').Value <> 'lala' then
excel1.ActiveSheet.Rows[1].Delete;
请指教

xifengge · 2008-03-21

excel1对象你创建了么？没创建当然会找不到对象了。
或者是Sheet没创建呢，取ActiveSheet当然就不行了。

woshiyaya · 2008-03-23

对象当然创建了，sheet也是已存在的，请再看看。

dx163805 · 2008-04-17

应该是用“cells”，而不是“Range”，你看看

老阿Q · 2008-04-29

excel1.ActiveSheet.Range('B1').Text <> 'lala'

gencheng · 2008-06-01

if excel1.ActiveSheet.Cells.item[1, 2]<> 'lala' then

woshiyaya · 2008-06-05

老阿Q回答我测试运行提示为“找不到成员”，gencheng的回答我测试运行提示为“invalid variant operation”谢谢大家，到底我的程序哪里有问题

wildhorsetlj · 2008-06-05

更改为：
if excel1.ActiveSheet.Range['A2:A2'].value <> 'lala' then

偶尔幽默 · 2008-06-05

把if excel1.ActiveSheet.Range('A2').Value <> 'lala' then 改为
if excel1.workSheets[1].cells[2,1].value <> 'lala' then

我试过了，完全通过。

woshiyaya · 2008-06-10

谢谢大家的帮助！