[已解决]请教各位帮我看一下代码哪里错了，谢谢

womohe

柳如烟 发表于 2012-9-7 21:41

大虾能否指出我的代码哪里错了吗？谢谢啦。。。

柳如烟

womohe 发表于 2012-9-7 22:00
大虾能否指出我的代码哪里错了吗？谢谢啦。。。

[c2].Resize(UBound(d1.Keys) + 1, 1) = Application.Transpose(dl.Keys)
这句的错误在于 dl.keys,注意你代码中这里是“dl”，即小写的D和小写的L，而你定义的变量是d1，即小写的D和数字1

[d2].Resize(UBound(d2.Keys) + 1, 1) = Application.Transpose(d2.Keys)
既然把d2定义为字典对象，前面再用[d2]引用单元格就会出现错误。

至于点击按钮出现错误是因为给按钮指定了不存在的宏。

womohe

柳如烟 发表于 2012-9-7 23:07
[c2].Resize(UBound(d1.Keys) + 1, 1) = Application.Transpose(dl.Keys)
这句的错误在于 dl.keys,注意你 ...

哇，大虾好细心呀，我怎么都没发现，太感谢啦{:27:}