平时在工作中经常需要从一大堆数据中查找几十个项目的数据，很多筇瑰尬哇公司没有数据库。有些公司即使有ERP数据库，导出来的数据鼬薪渌圾也是很难满足我们的要求，本人经过学习VBA，发现此功能太强大了，可以节省我们很多的时间去作一些简单的，并且重复的工作，下面介绍一个可以快速从几百万条信息中找出需要的对应项，并将对应项的单元字体颜色改成红色。希望能帮助到各位需要的朋友。
工具/原料
电脑
OFFICE软件
方法/步骤
1、打开需要操作的EXCEL文档（为了方便起见，我将文档简单化），如下图所示：
2、将需要查找项拷贝到右边任何一列中（里面没有内容最好），如图所示的红色部分：
3、点击工具栏上面的”开发工具“，再点击”宏“按钮，如下图所示：
4、在宏名位置输入任何一些字符串，给VBA宏起个名字，点击”创建“铵钮，如下图所示：
5、进入到VBA程序编辑栏淘篱跬翎中，如果学过VB的同学可能比较熟悉这个页面，如果没有学过的同学也不用担心，我教大家修改一下我的代码就可以完成大家想要的效果，Subtest()将下面的代码复鲽判砦吟制到这中间，如图所示，EndSubRange("E1048576").End(xlUp).Select'选择E列所有在效格zd=Range("E1048576").End(xlUp).Row'E列为被查找列Range("H1048576").End(xlUp).Select'选择H列所有在效格zx=Range("H1048576").End(xlUp).Row'H列为需要查找项Fori=1Tozd'利用FOR揗环来查找Forj=1TozxIfCells(i,5)=Cells(j,8)Then'Cells(i,5)中的5代表第5列'Cells(j,8)中的8代表第8列Cells(i,5).Font.ColorIndex=3'将查找出的对应项字体改为红色EndIfNextNext
6、添加好后，点击如下图中的运行按钮，如下图：
7、回到EXCEL表中，我们发现，奇迹发生了，我们要找的对应项字体颜色都变成红色了，
8、只要我们再对所选项进行字体颜色排序，所有项都能排在一起，是不是很实用呢？那就赶紧投我一票吧！