首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

据说是高手才能解决的有关问题

2013-02-25 
据说是高手才能解决的问题本帖最后由 xuefengg 于 2012-10-25 07:46:18 编辑EXCEL中从一张表读取数据填写

据说是高手才能解决的问题
本帖最后由 xuefengg 于 2012-10-25 07:46:18 编辑 EXCEL中从一张表读取数据填写到另一张表的对应行里,用VBA如何实现?
(表1,book1,sheet1)
   A     B         C
1  no    name      age
2  1     lucy      16
3  2     lee       26


(表2为另一个文件,book2,sheet2)
   A    B      C      D 
1  no   name   sex    age    
2  1    Jim    boy     0
3  2    lee    boy     0
4  3    krl    boy     0
5  4    lucy   girl    0
6  5    jack   boy     0


最后book2应该实现
book2,sheet2
no   name   sex    age    
1    Jim    boy     0
2    lee    boy     26
3    krl    boy     0
4    lucy   girl    16
5    jack   boy     0
[解决办法]
这个用VBA解决可以这样
可以看做用表1来补充表2,形成book2,sheet2
这样认定后,可以用两个数组来存放表1和表2的数据
表1数组name列和表2name列内容对应起来后,将对应的表1数组的对应行列元素填到表2数组的相应数组元素中
如果数据量超过一万,对应的循环可以改用数组+字典,用数组下标来定位
这样事先起来很快

刚来,不知发帖的规矩
excel文件能不能附上?

热点排行