用公式批量提取数据信息
《现代计算机》2004年第10期刊登了《批量提取,一键搞定》一文,看后深受启发,但笔者认为,文中所介绍的方法过于复杂,其实用Excel公式照样可以实现上述效果。
假设在一个Excel工作簿中有N个企业基本情况登记表,不同工作表中分别保存了各个企业的基本情况数据,工作表格式都一致,名称分别为Sheet1、Sheet2直到SheetN。图1为Sheet1表中企业基本情况表,从该表中可以看到,企业名称、负责人姓名和联系电话等数据分散在B2、B4及G4单元格中。如何提取各表中企业名称、负责人姓名和联系电话等内容,并将提取的.内容制成如图2所示的表格呢?
一、新建工作表
在工作簿中插入一个新工作表,并将该工作表命名为“通讯录”,合并A1—D1单元格,在合并后的单元格中输入“全市建筑企业负责人联系电话”。分别在A2、B2、C2、D2单元格中输入“序号”、“企业名称”、“负责人”、“联系电话”等字段。
二、输入公式
在序号列中填充如图2所示的序号,在B3单元格中输入公式:“= INDIRECT("Sheet"&ROW()-2&"!$B$2")”。公式中INDIRECT函数返回由文字串指定的引用。ROW()返回所在单元格的行号,"Sheet"&ROW()-2&"!$B$2"为要引用的单元格,该公式含义为返回Sheet1表中B2单元格的值。同样道理在C3及D3单元格中分别输入“=INDIRECT("Sheet"&ROW()-2&"!$B$4")”、“=INDIRECT("Sheet"&ROW()-2&"!$G$4")”。上述公式中单元格引用要使用绝对引用,否则会导致错误的结果。公式输入完成后,选中A3:D3单元格区域,将鼠标指向D3单元格右下角的填充柄,将公式向下拖动复制到相应数据区域。这样,一份精致的表格就呈现在你面前了。
三、批量命名工作表
如果各工作表名称无规律,如“一建公司表”、“路桥公司表”等,使用公式前还需将所有表名称统一为默认的表名,当然表数量不多,用手工命名也可以,如果工作表数量很多,批量命名则要使用VBA代码了。具体实现方法如下:执行“工具→宏→Visul Basic编辑器”命令或按下Alt+F11组合键,在Visul Basic编辑器中选择“插入→添加模块”(图3),在代码窗口输入以下代码:
Sub 工作表命名()
Dim Sh As Worksheet
For Each Sh In Worksheets
= Name
Next
End Sub
输入完成后,关闭VBA窗口,返回到工作表编辑窗口,在Excel文档中执行宏即可。将工作表名称统一后,再按照步骤一和二介绍的方法,提取表格中的数据。怎么样,是不是很简单?
-
上司不是用来效忠,而是拿来利用的
中国人向来有忠君思想,说的好听这是古文化传统,说的直接点就是奴性。忠君思想,实际上就是承认某个人比自己的地位高,承认对方理应统治自己,并且不抱任何独立反抗的念头。可问题是,如果这个人并不是自己的父母,那我们为什么非要让他来统治呢?如果人人都是平等的话,我们又...
-
东莞租房子要注意什么
如今的高房价让许多工薪阶层望而却步,只能以租房子的形式来满足住宿需求。作为我们饮食起居的地方,房子一定要选好,只有方方面面的问题都兼顾好,才能避免租房后产生许多不必要的麻烦。今天,小编来跟大家盘点一下东莞租房子要注意什么吧。注意一:仔细核查房东身份以及...
-
在求职履历表上流浪
又是一年招聘热季。在浩浩荡荡的求职大军中,有的人信心十足,有的人仓促应战,还有的人屡战屡败又屡败屡战。每个人都希望找到一份适合的工作,但也总有那么一些人,怀揣着单薄或者厚重的履历,流浪着走向下一个招聘单位。能力不足+计划不明:他始终漂在北京因为学校的宿舍不...
-
年度培训工作总结通用范例
个工作报告中有可取之地也有不可取之地。我们在不断挑选优秀的工作总结加以借鉴时,我们关于对工作总结报告的书写和借鉴水平也在不断提高。下面是小编收集的编辑年度个人总结范文,欢迎阅读!转眼一年又过去了。就在此时,需要回头总结的时候,从心底里感到日子的匆匆...