[已解决]VBA 字典求教！请问我的错在哪里了，谢谢！

mfk1288

请教我的附件是把表2的数据汇总到表1里，表1黄色部分是目的结果。请教我的宏语句错在哪里了？谢谢！ 请教.rar (7.66 KB, 下载次数: 13)

2011-10-27 10:08 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

爱疯

2011-10-27 10:18

Cells(i, 2) = Left(d(Cells(i, 1).Value), Len(d(Cells(i, 1).Value)) - 1)

要加.value，不然字典添加的是Cells(i, 1)对象

跳转到最佳答案楼层

爱疯

Cells(i, 2) = Left(d(Cells(i, 1).Value), Len(d(Cells(i, 1).Value)) - 1)

要加.value，不然字典添加的是Cells(i, 1)对象