24小时热门版块排行榜    

查看: 669  |  回复: 7

zaing

银虫 (小有名气)

[求助] 如何按条件将文件A中的部分数据读入文件B中?

我对VBA也是最近几天才关注,基本属于一点不懂的那种。现有两个excel文件,暂且分别命名为1和3。文件1中A列为编号,B列为对应的数值。而文件2中A列为断断续续的编号(文件1相比编号少了很多),但没有对应的数值。请问如何将与文件1中编号相同的所对应的值读入文件3中的B列?附件只是很少的一部分数据,实际数据是很庞大的,所以我想只能通过vba来实现了。请大家附上VBA语言,最好有注释的那种,顺便自己学习学习调试调试。多谢!
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 1.xlsx
  • 2013-08-07 20:21:48, 15.03 K
  • 附件 2 : 3.xlsx
  • 2013-08-07 20:21:50, 14.35 K

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

万孝莉

新虫 (小有名气)

【答案】应助回帖

=INDEX('[1.xlsx]Sheet1'!$B$2:$B$217,MATCH(A2,'[1.xlsx]Sheet1'!$A$2:$A$217,0))
这个可以用函数的……
真想用vba告诉我哈
2楼2013-08-24 17:45:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xueyuanlang

新虫 (初入文坛)

【答案】应助回帖


jjdg: 金币+1, 感谢参与 2013-09-28 10:20:28
关键提示:用for循环加if判断,便可完成。

[ 发自手机版 http://muchong.com/3g ]
持之以恒
3楼2013-08-25 00:23:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xueyuanlang

新虫 (初入文坛)

【答案】应助回帖


jjdg: 金币+1, 感谢参与 2013-09-28 10:20:23
补充:循环就是遍历单元格

[ 发自手机版 http://muchong.com/3g ]
持之以恒
4楼2013-08-25 00:25:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

【答案】应助回帖


jjdg: 金币+1, 感谢参与 2013-09-28 10:20:17
lookup()函数可以试一下。match()函数只能返回位置数,好像用不上。
5楼2013-09-28 00:29:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

【答案】应助回帖

我在你的文件1中进行了示例,在sheet1中查询sheet2的编号,将获取的数值填在相应的编号后面。
注意需要先对sheet1中的数据按照编号排序,为升序。
6楼2013-09-28 16:42:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

现在带附件了。

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 11-rrr.xlsx
  • 2013-09-28 16:43:57, 17.52 K
7楼2013-09-28 16:44:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

需要将lookup公式中的矢量表固定,加了$,就不会变动产生错误。重新上传了。
好长时间没有上来回帖都生疏了。

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 11-rrr2.xlsx
  • 2013-09-28 16:47:50, 17.44 K
8楼2013-09-28 16:48:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zaing 的主题更新
信息提示
请填处理意见