[已解决]vba 应用字典出错，提示数据类型不符

zhl521125

求大神帮忙！
应用字典出错，提示数据类型不符，更改成默认的也不行，请帮忙看一下如何解决？
已传附件

最佳答案

月排行榜 / 总排行榜

fffox

2014-12-15 13:06

zhl521125 发表于 2014-12-15 11:51
我的目的是统计任意一列去掉重复项和对应的另一任意列单元格内容相加（如果是数字直接求和，如果非数字用 ...

代码没有问题，主要是转置函数transpose的限制，换成数组方式就好了：

跳转到最佳答案楼层

Excel学徒123

Long是长整型，数值范围是 -2147483648 - 2147483647，而String是文本型

zhl521125

Excel学徒123 发表于 2014-12-15 11:33
Long是长整型，数值范围是 -2147483648 - 2147483647，而String是文本型

应该怎么修改呢？我是菜鸟，从别人那拷贝来自己修改的，结果发现出错
谢谢回复

Excel学徒123

zhl521125 发表于 2014-12-15 11:36
应该怎么修改呢？我是菜鸟，从别人那拷贝来自己修改的，结果发现出错
谢谢回复

代码没缩进，看着头大，还有，没明白你要做什么

zhl521125

Excel学徒123 发表于 2014-12-15 11:47
代码没缩进，看着头大，还有，没明白你要做什么

我的目的是统计任意一列去掉重复项和对应的另一任意列单元格内容相加（如果是数字直接求和，如果非数字用/连接起来）
非专业编码，不懂缩进，抱歉~~

fffox

zhl521125 发表于 2014-12-15 11:51
我的目的是统计任意一列去掉重复项和对应的另一任意列单元格内容相加（如果是数字直接求和，如果非数字用 ...

代码没有问题，主要是转置函数transpose的限制，换成数组方式就好了：

zhl521125

fffox 发表于 2014-12-15 13:06
代码没有问题，主要是转置函数transpose的限制，换成数组方式就好了：

完美解决，多谢fffox！！
感谢各位支持！