14从宏开始学习VBA.docVIP

1.1 VBA的功能 这些年笔者在工作的每个地方，几乎都会问周围经常使用Excel进行数据分析与管理的同事同一个问题：为什么不使用VBA处理那些繁琐的日常事务？得到的回答不外乎以下两种：VBA是什么，有用吗？VBA太难了，看了很多书也不得要领，不知道怎么运用到实际工作中。 笔者想，本书的读者很可能也有同样的疑问。下面首先举个例子来说明VBA的必要性。有十几个工作簿，每个工作簿只有一个表，每个表里有10000行左右。而其工作即是将里面部分数据行删除。删除的规律是：电话号码列包括座机号（带区号）或手机号，该列最多包括两个号码。如果有两个电话时，使用“/”隔开。而需要删除的是那些只有座机号的行。 该问题中共有10万多行数据，如果一行一行手动处理，工作量将十分巨大。笔者共使用了两个方法解决了这个问题。 其一是使用自动筛选和函数。首先新建一个列，该列使用函数按照“/”分开两个电话号码。然后取得两个号码的第一位数，把它们相加。如果都是座机号，那么这个数字一定为0。如果包含了手机号，该结果将大于0。然后通过自动筛选，将该列为0的数据筛选出来并删除。 其二是写一个加载宏，在这个加载宏里面包含了一个自定义函数。函数返回的就是前面相加后的结果。对于每一个工作簿将省去每次都需要手动书写公式的麻烦。 两种方法大体上是一致的。区别只是前者完全是通过Excel 2010的界面操作完成的，而后者是通过编程完成，前后只花了几分钟的时间。 由此可以看出，全面了解Excel 2010的功能和掌握一部分的编程技巧，将极大程度地提高办公效率。 对于后一种，笔者想说的是，VBA是一种很通俗易懂的计算机语言，通常所欠缺的是发现问题、分析问题的思维过程。建议读者在阅读本书实例时，首先自己构思一下应该如何完成该系统，并把自己的解决方案实现出来，最后再看实例中是如何做的。 使用VBA开发应用是一份创造性的工作。在很大程度上依赖于开发者本人的创造力。但是有一点是必然的，VBA是一种程序语言，有确切的执行规律。 例如上面的电话号码列，如果没有“/”分割两个号码或者座机号码不带区号，那么后面所使用的解决办法就不能有效执行了。使用VBA开发应用时，通常第一步就是找到这种潜在的规律，因此每一个疑难问题的前期分析都很重要。只要是操作有规律的数据，就可以通过编程来解决，而VBA是办公软件下的编程环境，学好VBA可以极大地提高工作效率。 在Excel 2010中处理数据时，经常需要按照某些条件对数据进行筛选。通常可以采用自动筛选功能实现，但有时筛选的条件十分复杂或者需要筛选出某列的不重复项，就需要使用高级筛选功能。自动筛选功能将在第5章中介绍。由于本章的实例中涉及高级筛选，因此将高级筛选的知识先在此加以简单介绍。 高级筛选的操作既可以通过菜单实现，也可以使用VBA代码实现。详细的界面操作可以参见1.4.2节的介绍。这里详细介绍高级筛选的代码实现及其语法格式。高级筛选是通过单元格对象或区域的AdvancedFilter方法实现的。其语法格式如下： 表达式.AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique) 各参数的意义如下。 Action：CriteriaRange：可选参数。该参数指定条件区域。如果省略该参数，则没有条件限制。 CopyToRange：可选参数。如果Action为xlFilterCopy，则为复制行的目标区域。否则，忽略该参数。 Unique：可选参数。如果为True，则只筛选唯一记录。如果为False，则筛选符合条件的所有记录，默认值为False。 这里不再列出该方法的实例，读者可以参见1.4.2节的代码。 1.2 认识VBA编辑器（VBE） 在学习Excel VBA开发之前，先讲解VBE开发环境。图1-1显示了一个VBE开发环境的界面，从图中可以看到VBE开发环境的4个基本组成部分：工程资源管理器、“属性”面板、代码窗口和立即窗口。 图1-1 VBE编辑环境 要从Excel 2010的界面进入VBE，可以采用两种方式： 按Alt+F11快捷键。 在Excel 2010主界面的左上方单击快速访问工具栏右侧的下拉按钮，在弹出的下拉菜单中选择“其他命令”命令，如图1-2所示。 在打开的“Excel选项”对话框的“快速访问工具栏”选项卡中，先在“从下列位置选择命令”下拉列表框中选择“所有命令”，再拖动滚动条找到并选择Visual Basic选项，单击“添加”按钮，即可将Visual Basic工具添加到快速访问工具栏中，如图1-3所示。 图1-2 快速访问工具栏下拉菜单 ? 图1-3 “Excel选项”对话框 以后，直接在快速访问工作栏中单击Visual B