首页 > 新闻资讯

怎样把excel中姓名对应的成绩导入到一张相同姓名excel表中？

实习编辑 • 2023-12-07 19:54:33 • 新闻资讯 • 阅读 3
网友解答:

这个问题用vba就可以实现，三步就好！第一步：准备数据

如何把表1到表5中光头强的成绩，统一提取到汇总表中！

在原有表格基础上，新建两个表，如下图：

第二步：插入控件，在控件指定代码，如图：

1、alt+f11,调出vba代码窗口，

怎样把excel中姓名对应的成绩导入到一张相同姓名excel表中？

2、插入一个模块

3、复制以下代码到这个模块内。

sub成绩提取()

dimrngasrange

dimbasinteger

dimcasinteger

dimj

j=sheets("成绩汇总表").cells(5,9)

sheets("成绩汇总表").select

columns("a:g").select

selection.clearcontents

sheets("data").select

columns("a:d").select

selection.deleteshift:=xltoleft

worksheets(1).select

rows("1:1").select

range(selection,selection.end(xldown)).select

selection.copy

sheets("data").select

setrng=sheets("data").range("a65536").end(xlup)

b=rng.row

sheets("data").cells(b,1).select

activesheet.paste

c=worksheets.count

fori=2toc-1

worksheets(i).select

rows("2:2").select

range(selection,selection.end(xldown)).select

selection.copy

sheets("data").select

setrng=sheets("data").range("a65536").end(xlup)

b=rng.row

sheets("data").cells(b+1,1).select

activesheet.paste

next

sheets("data").select

rows("1:1").select

selection.autofilter

activesheet.range("$a$1:$d$1048576").autofilterfield:=1,criteria1:=j

columns("a:d").select

selection.copy

sheets("成绩汇总表").select

columns("a:a").select

activesheet.paste

range("a1").select

application.cutcopymode=false

msgbox"已汇总完毕"

endsub

4、插入一个控件，指定这个宏，执行代码你就可以了。

三、最终效果

如果这个回答帮助到了你，请帮忙转发出去，让更多人提高工作效率!

如果这个回答对你有帮助，请关注我，每周分享更多干货！

谢谢你的点赞！

网友解答:

第一、把表一姓名按顺序排序第二在第二张表用vlookup()函数即可在成绩处输入公式=vlookup(b1,sheet1!b1:c36565,2,true)，然后一拖到底。选择填充格式。

原文标题：怎样把excel中姓名对应的成绩导入到一张相同姓名excel表中？，如若转载，请注明出处：https://www.saibowen.com/news/22692.html
免责声明：此资讯系转载自合作媒体或互联网其它网站，「赛伯温」登载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述，文章内容仅供参考。

怎样把excel中姓名对应的成绩导入到一张相同姓名excel表中？ 怎样把excel中姓名对应的成绩导入到一张相同姓名excel表中？介绍
赞 ( )
打赏 微信扫一扫微信扫一扫
上一篇：手机绑定了手机号码怎么解除绑定 怎么查看手机都绑定了哪些QQ？ 下一篇：在网络信息发达的今天，为什么有些人总是人云亦云，爱相信谣言？

相关推荐