原创作者: 卢子1987 转自:Excel不加班

要根据E1的姓名,在4个分表查找相应的数据。

分表的格式都一样。

如果知道姓名在哪个表格,直接用VLOOKUP函数就搞定了。

=VLOOKUP($E$1,财务!$A:$G,COLUMN(A1),0)

问题是根本不知道姓名在哪个表格啊,这可怎么办?

那就只能用最原始的办法,进行4次VLOOKUP,这也太为难VLOOKUP了。

=IFERROR(IFERROR(IFERROR(VLOOKUP($E$1,生产!$A:$G,COLUMN(A1),0),VLOOKUP($E$1,品质!$A:$G,COLUMN(A1),0)),VLOOKUP($E$1,财务!$A:$G,COLUMN(A1),0)),VLOOKUP($E$1,行政!$A:$G,COLUMN(A1),0))

如果是40个分表呢?你是不是要写疯掉。

你是否还记得For循环,这个简直就是VBA的灵魂,VLOOKUP一次,剩下的循环下不就完事。对吧,挺简单的。

调用工作表函数,先输入WorksheetFunction,再输入.,就可以将Vlookup调用出来,语法跟在工作表一样。

现在要根据E1单元格的内容,查找在财务这个表格对应的第1列内容。

现在要根据E1单元格的内容,查找在财务这个表格对应的第2列内容。

这里实际上要查找1-7列的所有对应值,不能傻傻的一个个改吧,For循环该上场了。

单元格向右,可以用Range("a4").Offset(0, ic - 1),ic为变量。

Vlookup第3参数,也用ic这个变量。

到目前为止,就完成了在财务这个工作表查找所有列的内容。

现在要依次查找所有工作表,那就再来依次For循环。

理论上这个是可以的,但实际上是不行的,Vlookup在查找不到对应值的时候会报错。一运行代码,就弹出出错对话框。

在工作表中容错用IFERROR函数,在VBA中用On Error Resume Next。

到此,完整的代码就出来了。

Sub 新v()

On Error Resume Next

Dim i, ic As Integer

For i = 2 To Sheets.Count

For ic = 1 To 7

Range("a4").Offset(0, ic - 1) = WorksheetFunction.VLookup(Range("e1"), Sheets(i).Range("a:h"), ic, 0)

Next

Next

End Sub

现在换一个人员,也可以查找到。

你发现VBA的好处没,就是遇到一些重复性的工作,可以直接扔给For循环。

连续9天的VBA教程,每天都有For循环,没有一次循环搞定不了的,如果有那就再来一次循环。

4 4c语言表格的画法_别再用Vlookup函数了,查找4个表格它更简单相关推荐

  1. excel表格数字显示不全_从word中把身份证号码复制到excel表格中完整显示身份证号码后4位...

    ​ 如果直接从word中复制内容,在excel表格中进行粘贴处理,gif动画演示如下: 在word中,身份证号显示是完整的,而直接复制到excel表格会显示成E*17,这是科学计数法.双击单元格显示出 ...

  2. wordpress 表格文字对齐_不要再用空格来对齐Word文字了,这样做,3秒对齐所有Word文字...

    我们在使用Word文档的时候,都需要将里面的文字对齐,看起来会更加整齐干净.但是小编发现,现在还是有很多小伙伴用空格来对齐Word中的文字,这样实在是太慢了.今天小编将告诉大家几种非常简单又快速的方法 ...

  3. 项目管理六大制约因素_知道了这7点,软件项目管理会变得更简单!

    软件项目管理,很多产品经理(项目经理)都在吐槽,自己怎么样难以管理,不好做.但是,软件项目管理虽然不易,但是也可以适当把软件项目管理变得更简单,更易于管理.但是需要多做一些管理工作.下面的七点,好好看 ...

  4. 源达投顾软件怎么样_源达投顾:让人工智能炒股终端变得更简单

    据悉,源达投顾近几年一直都在专注于人工智能炒股软件的开发,致力于为更多投资者提供方便好用,功能多样的炒股软件,协助投资者更好的掌握投资方向,为创造更多财富提供良好的支持.那么源达投顾的炒股软件怎么样? ...

  5. asp多表查询并显示_零公式实现多表数据查找!3步设置,简单高效!3分钟学会,真香...

    EXCEL进阶课堂成长过程中,得到了各位粉丝关注和支持,给了进阶君持续更新的动力,谢谢大家.通过私信,陆续有小伙伴提出了工作当中的实际问题,进阶君从中选取了一些有典型代表意义的问题进行发文回复,希望能 ...

  6. wps怎么把字缩到最小_怎么对WPS文字文档进行缩印?这样设置更简单

    一说到文档缩印就让小编想起了上学的时候,不知道还有没有同道中人,一到考试就会有"聪明人"去学校小卖部进行打(suo)印,小编由于不知道怎么缩印而错过了好多.当然,缩印的用途并不止于 ...

  7. WPS表格VLOOKUP函数的基本用法

    提示:文章写完后,目录可以自动生成,如何生成可参考右边的帮助文档 文章目录 一.VLOOKUP函数是什么 二.VLOOKUP函数[正序查询] 三.VLOOKUP函数[逆序查询] 四.VLOOKUP函数 ...

  8. Java EXCEL 表格导入导出(带下拉选-带VLOOKUP函数封装)

    Java EXCEL 表格导入导出(带下拉选-带VLOOKUP函数封装) 对于excel Java POI 使用 目前简单导出导入功能网上很多,但是对于有下拉选,样式等缺点却是最大硬伤,故此封装一个通 ...

  9. Excel:如何用vlookup函数进行两个表格数据的对比。

    Excel作为职场的重要办公软件,强大的功能给我们提供了很多便利的地方.那么Excel 如何用vlookup函数进行两个表格数据的对比呢,如何从一堆数据中匹配出自己需要的值呢. 工具/原料 Excel ...

  10. vb表格控件_(超级干货)ExcelVBA拆分表格并分别发送邮件增强版

    这是POINT小数点的第 339 篇文章 点点写在前面: 之前我们有分享过一个场景1:你制作了一份总表你想要拆分成各个分公司,并且你需要对分公司的多个同事发送邮件.如果有20几个分公司,你要拆分+写邮 ...

最新文章

  1. “老赖”罗永浩:就算“卖艺”也会还债!孙宇晨:我买!
  2. 安装mysql 5.5.14 报错
  3. Oracle 数据类型及存储方式(袁光东 原创)
  4. CSS基础必备知识点03
  5. Dapper实用教程
  6. 剑指offer面试题[60]-将二叉树打印成多行
  7. 退出整个Android程序的工具类
  8. 在Linux Redhat 9.0使用YUM
  9. 怎么把索尼摄像机拍摄的RSV文件修复转换为MXF视频
  10. Mac Air USB接口 失效/不起作用 的修复方式
  11. NDK-r25交叉编译glib-2.73.3
  12. 近世代数概论------整数
  13. 安卓实现截图功能的两种方式
  14. Json解析后显示在listview控件上
  15. Table元素的使用
  16. 物联网与大数据(二)从物联网看大数据
  17. JVM SandBox源码解析(一):启动时初始化、启动时加载模块、ModuleHttpServlet进行Http路由
  18. webshell 提权
  19. Windows系统更新完后进不去Microsoft Store,报错:需要使用新应用以打开此ms-windows-store链接
  20. 统计学中的Bootstrap方法介绍及其应用

热门文章

  1. make: ./libtool:命令未找到
  2. NHibernate 的 ID 标识选择器
  3. IBM中低端存储解决方案
  4. BZOJ5217[Lydsy2017省队十连测] 航海舰队
  5. copyWebpackPlugin的使用及常见问题(glob及Path ............... is not in cwd)
  6. 新安装的apache无法解析php,apache无法解析php
  7. 均线策略python代码_Python版商品期货多品种均线策略
  8. sqlsever主库从库如何切换_面试最让你手足无措的一个问题:你的系统如何支撑高并发?...
  9. 大数据平台常用组件_京东大数据平台进化之路
  10. 小菜找实习——阿里3.25场笔试第一题(矩阵数组最小差值和)