首页 / 职场百科

excelvba如何查询表数据

2024-12-19 08:31职场百科
问题情景

Excel跨多个工作表查询数据,用公式不好统计,尤其是遇到不断增加工作表的情况,比如:

上图中,要根据订货单号选择相应的货名、数量、单位、单价等信息。而这些订货单号对应货名等分布在不同的9个工作表中,而且工作表还在不断增加。

在这种情况下,公式显得有些苍白无力,就需要用VBA来完成跨表查询。实现效果如下:

VBA实现

在代码窗口中输入以下代码:

Sub 多表查询()Dim i%, k%Dim irow%, icol%Dim sht As WorksheetRange(a5:e200).Clear 清除a5到e200区域中的数据,此处200可根据数据行多少改变k = 1Application.ScreenUpdating = FalseFor Each sht In Worksheets If sht.Name ActiveSheet.Name Then 当工作表不是当前工作时,执行以下语句 With sht irow = .Cells(.Rows.Count, 1).End(xlUp).Row 当前工作表数据行数 icol = .Cells(1, .Columns.Count).End(xlToLeft).Column 当前工作表数据列数 For i = 1 To irow If .Cells(i, 1).Value = Sheets(1).Cells(2, 5).Value Then 当前工作表是第一列i行数据与sheet1工作表E2单元格数值相同时 .Cells(i, 2).Resize(1, icol).Copy Sheets(1).Cells(4 k, 1) 将第i行数据复制到sheet1工作表第4 k行 k = k 1 End If Next i End With End IfNextApplication.ScreenUpdating = TrueEnd Sub

如下图:

如果不知道“按订货单号查询”按钮怎么设置,可参考文章Excel | 让“宏”来替你做重复动作

------------------------------------------

-----------------------------------------

加入圈子,一起学习office吧!

猜你喜欢

  • 排行榜

    电饭煲排名前十名:品牌排行榜前十名实测数据供你参考

    【前言】在快节奏的现代生活中,电饭煲早已成为家家户户厨房的“刚需担当”。它不仅仅是一个简单的烹饪工具,更是现代饮食生活的重要缩影,体现了人们对于便捷、高效生活方式的追求。【行业乱象】然而,繁荣的市场背后却暗藏隐忧。随着行业竞争加剧,很多品牌为抢占份额,盲目追求低价与多功能噱头,导致市场上充斥着大量劣..

    2025-04-30
  • 百科大全

    螃蟹怎么保存在冰箱里螃蟹如何保鲜

    3、螃蟹怎么保存在冰箱里可以将螃蟹的脚和钳子捆起来,然后放进冰箱的冷藏室,盖上湿毛巾保存即可,或者将螃蟹用沸水煮熟、放凉,再用保鲜袋或密封盒装好放入冰箱里冷冻保存。螃蟹怎么保存在冰箱里螃蟹放入冰箱冷藏保存一般可以存放3-4天,放置超过一个星期,螃蟹基本上就会死掉了。一般来说,死螃蟹是不能吃的,因为螃蟹死..

    2025-04-30
  • 旅游百科

    新手如何挑选一把紫砂壶呢

    宜兴紫砂壶的伺茶性早被发掘和认可,明代周高起在紫砂专著《阳羡茗壶系》开创篇中言“以本山砂土,能发真茶之色香味”,明代李渔评壶“茶壶以砂者为上,盖既不夺香又无熟汤气”这也是大家喜欢紫砂壶的原因。很多喝茶的朋友对紫砂壶跃跃欲试,想选购一把合适的紫砂壶,但是又不知道何从着手,因不了解紫砂壶,紫砂壶水深,不..

    2025-04-30
  • 热点百科

    专访高科数聚首席执行官董琳:如何从场景出发拨开车企数据变现迷雾

    接受采访时,高科数聚首席执行官董琳正在去往上海虹桥火车站的路上。春节过后,董琳一下子忙了起来,紧凑的行业会议和客户走访行程使得她很少能在北京公司总部露面。如今的汽车市场和十多年前相比发生了翻天覆地的变化,在这风云激荡的年代,个人也会面临各种选择。对于走出相对稳定的汽车厂家体系,来到创业公司面临更多不..

    2025-04-28
  • 娱乐百科

    房产中介是如何双向谈价格的

    事情起因近日,某房地产中介的经纪人爆料,自己曾于2019年6月21日、22日两次带领谢娜、张杰夫妇去上海思南公馆看房。当时谢娜、张杰夫妇以“不喜欢”为由没有成交,可后来这位经纪人发现,两人竟私下绕过自己购买了这套房子,且已于2020年2月完成过户手续。按市场成交价估算,这套豪宅的售价约6200万元,中介费可能就高达18..

    2025-04-28
  • 历史百科

    关平在正史中的形象怎么?最终是如何死的?

    关平在三国演义中的表现丝毫不必关羽差,他武勇过人,能与曹魏猛将庞德大战三十回合不分胜负,还跟随刘备一起出征西川立下汗马功劳,之后还与关羽一起镇守着荆州。在襄樊之战中关平沉着冷静的性格也帮助关羽躲过了一劫,他的戏份虽然不多,但是形象鲜明给人留下了很深刻的印象。在正史中关平并不是关羽的义子,而是关羽的长..

    2025-04-25
  • 世界最小

    还记得14年前“世界最小婴儿”吗?全身还没巴掌大,她现状如何

    01在怀孕期间,准妈妈们需要格外小心,因为稍有不慎就可能导致早产。还记得18年前的“世界最小婴儿”吗?那位母亲在怀孕21周时早产,生下了一个体重不足一斤的小宝宝,比成年人的手掌还要小。当时,大家都认为这个小婴儿无法生存,但令人意外的是,宝宝展现出了强烈的求生意志,用尽全力呼吸和哭泣。正因如此,医生们也被小..

    2025-04-24
  • 历史百科

    贺人龙是哪位?他贺疯子的称号是如何来的?

    贺人龙是明朝末年时期的名将,朱由检年间参与过镇压农民起义活动,作战悍勇,人称贺疯子。今天小编带来了一篇文章,希望你们喜欢。他一生中的大部分时间都是在和农民起义军作战,可谓是死敌。从籍贯上来说,贺人龙和闯王李自成等大部分农民起义军领导人都是陕西米脂老乡,可他在和农民起义军作战时却从没有考虑过手下留情,..

    2025-04-24

微信分享

微信分享二维码

扫描二维码分享到微信或朋友圈

链接已复制