当前位置: 代码迷 >> VBA >> 据说是高手才能解决的有关问题
  详细解决方案

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

热度:214   发布时间:2016-05-11 06:27:12.0
据说是高手才能解决的问题
本帖最后由 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文件能不能附上?
  相关解决方案
本站暂不开放注册!
内测阶段只得通过邀请码进行注册!
 
  • 最近登录:Fri Apr 28 20:15:19 CST 2017
  • 最近登录:Fri Apr 28 20:15:19 CST 2017
  • 最近登录:Fri Apr 28 20:15:19 CST 2017
  • 最近登录:Fri Apr 28 20:15:19 CST 2017
  • 最近登录:Fri Apr 28 20:15:19 CST 2017