如何学习VBA_3.3.10 自制VBA工具，充分享受工作的乐趣
我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的劳动效率，而且可以提高数据处理的准确度。我推出的VBA系列教程共九套和一部VBA汉英手册，现在已经全部完成，希望大家利用、学习。
如果您只是一般的职场VBA需求，可以打包选择7.1.3.9教程+汉英手册，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的典型案例讲解。这四套教程内容掌握后足以处理一般工作中的问题，实际写代码的时候再辅助代码汉英手册，足矣！如果您想进一步提高，就需要选择高级阶段的教程了。
VBA是面向对象编程的语言，博大精深。很多朋友咨询VBA的学习方法，我会陆续给大家讲解一些我的经验，大家可以慢慢体会。今日的内容是如何学习VBA_3.3.10 自制VBA工具，充分享受工作的乐趣
【分享成果，随喜正能量】291 当了领导还深度插手具体的事务，就好比是跟下属抢吃的、抢表现的机会，不仅挤占了下属发挥才能的空间，还会让下属逐渐丧失与你合作、为你付出的意愿-一既然你无所不能，什么都要包办，那就自己干咯!一定程度上，领导水平的高低取决于他放手的程度。
3.3.10 自制VBA工具，充分享受工作的乐趣
初入职场，每个人，或多或少会有些工作的压力，这些压力有的是外部的，如公司要求你必须完成的工作，有的是来自内部，如自己要求自己水平要不断提高，不能久居人下，要提高自己的能力，有一个好的职位。无论是哪种压力，最迫切的是要自己提高自己的能力和水平，只有自己的能力和水平提高了，前者才不被挨骂，后者才能一步步地进取，世界上没有不劳而获的事情，我们的目的很唯一，就是提高自己的能力和水平。
但是，工作，毕竟只是生活的一部分，最怕的是把工作的压力带给自己周围的人，在努力的同时，要转变一下自己的思路，要想办法自己去消除这种压力，就是我的文章题目所提出的，要在学习有用的知识的同时，享受知识带给我们的乐趣，从而愉快地完成自己的工作，一方面可以让工作顺利完成，一方面不会把工作压力无谓地扩散。
怎么做到呢？如果你经常和数据打交道，恭喜你：VBA可以帮助你。事实胜于雄辩，我今日就从现实的工作中找一个利用VBA工具的小例子和大家分享，同时也是一个VBA实用工具的积累。
我在文章中经常提到FIND方法，甚至提出这是LOOKUP函数的终结者。我们在工作中经常会遇到各种各样的查找，如唯一查找，非唯一查找，模糊唯一查找，模糊非唯一查找，两列查找等等，这些查找在我们的工作中会占用很多的时间，如：领导经常会在快下班的时候给你一大堆的数据，要求你在下班前把这些数据的资料给统计出来，交给他。这是非常头疼的事情，查找虽然简单，但数据量大，而且最怕的是出错，时间紧，任务重，头皮都会发麻。
那么我们能不能做一个VBA的工具，把所有的查找集成一下，用来实现我们的各种目的呢？
答案是完全可以的，而且是必须的。
大家看下面的截图，这是我在工作中自己编的一个小工具,就是实现的这个功能：
我在“MY”工作表的第一行加入了很多按钮，这些按钮可以实现不同的目的：有唯一查询，有非唯一查询，有模糊查询，两列查询等等，只要在“MY”的工作表A列中输入想要查询的数据，就会在“FIND”页的工作表中找到相应的记录，并把这些记录的相关信息记录在”MY”工作表的B2、 C2、 D2 等单元格内。从而实现了查找的自动化。例如上面的截图中，我在A列录入了几组数据A1 A2 A3 A4 A5 A6 A7 A8这些数据，在“FIND”工作表中是什么样子呢？我们看看“FIND”页工作表的截图：
我的目的是A1的相关信息，也就是说“FIND”页中的第二行的有关A1的信息B1、 C1、 D1传递到 “MY”页，放在相应的单元格中，如何实现呢？只需轻轻的点击一下按钮“A唯一查询”即可：
看下面的查找后的截图：
如上截图，非常轻松地实现了我们的要求，有了这个工具，假如领导要求你在下班前在上万条的记录中查出几百条记录，是不是几秒钟就可完成呢？
当然，上面的例子是记录唯一的情况，那么记录不唯一呢？正如我给出的资料中有几个A1的信息，这时怎么办呢？你只需要轻点按钮“非唯一查询”按钮就可以实现了：看下面的截图：
这样就把所有的A1信息都给列出来了。当然，在实际的应用中要事先判断一下记录是否是唯一的，这也是不难做到的。
那么如果要查找到所有包含所给信息的记录呢？也不难啊，你可以点击一下“模糊非唯一查询”的按钮就可以实现啦，我们看看点击后的结果：
所有的信息记录都出来了.非常的方便、快捷。这个工具中还有很多的按钮就不一一的说明了，那么我是如何实现的呢？看我的代码：
代码就不一一列出了，其实，在《VBA代码解决方案》中有很多的实例，这套书就是我20多年经验的积累，读者可以参考其中的内容，把和自己工作有关的程序做成自己的小工具，当你应用这些自己做的工具，顺利地完成了工作，即准确，又高效，何尝不是一件乐事呢？跟紧我，好好学习VBA吧。今天的工具资料将开放代码。
- Mynz-Find.xlsm
我20多年的VBA实践经验，全部浓缩在下面的各个教程中：
