什么是VBA？为什么要学习VBA?

　　如果你是学习Excel的朋友，对VBA这个概念不陌生吧?

　　VBA的功能实在太强大，可初学的我们，面对那一串串尤如外星文的代码，你是不是看得头昏脑胀?

　　想学，是不是却茫然得找不到入口?

　　在这里，我把我自己的学习心得和笔记放出来，和大家一起分享交流，一起学习，共同进步。

　　对了，还要告诉大家，我也是初学者，不是高手，如果有什么说得不对的，希望大家及时指出。

　　我的目的不是教学，而是期望创造一个有你，有我，有他的学习氛围!开始吧，记住一个共同的目标——掀开那层神秘的面纱，看看VBA的真实面目。

　　什么是VBA?为什么要学习VBA?

　　VBA是Visual Basic For Application的简称，具体说来，可能让叶枫三天三夜也说不完，叶枫也只知道VBA是建立在Office中的一种应用程序开发工具，其实知道这也就够了。很懒很笨的叶枫只想吃香喷喷的大米饭，可从没想要知道大米饭是怎么来的。

　　Excel本身的内置函数其实已经很强大了，甚至有人说，只要学会二三十个函数，就已经可以满足普通用户日常的工作需求。

　　那我们为什么要学VBA?

　　是的，如果只需要满足一些普通的工作需求可能永远也不会用到VBA，但在实际应用的过程中，人们的操作却越来越大，需要也越来越高，这时候就需要用VBA来对Excel进行二次开发了，VBA可以有效地自定义和扩展Excel的功能。

　　但有一点叶枫想要告诉大家，VBA功能很强大，但并不是万能的，也并不是所有工作都需要用VBA来解决，也并不是所有工作用VBA来解决都会很简单，这要根据实际情况而定，有些工作你用VBA来解决的话相反会变得很麻烦。

　　VBA与宏

　　刚开始的内容听起来很枯燥，请大家不要分心，耐着性子看下去，兴趣总是慢慢积累的。

　　1、亲自动手，录制一段属于自己的宏

　　提到VBA，相信很多人想到的就是宏，但是VBA与宏是不是一回事?我觉得它们不是一回事，但这不重要，我们要做的是先来认识一下宏。

　　宏是什么?

　　我理解的宏是一系列固定动作的集合，这个集合当遇到让他执行的条件后就逐个执行。

　　有人把我们录制的宏比喻成一个武术运动员在比赛中练就的一段武术套路动作，这个套路遇到一定的条件(比赛)就执行。

　　好了，别闲着，动一动你可爱的右手，点点鼠标，打开一个Excel文件，录制一段宏来来研究研究，步骤如下：

　　(1)选中任意一个单元格;

　　(2)打开菜单—>工具—>宏—>录制新宏，调出宏录制对话框，输入宏名(mysub)，确定;

　　(3)设置单元格字体为仿宋体，红色;

　　(4)点击停止录宏。

　　这样，一个简单的设置单元格格式的宏就录好了。

　　2、鼠标点一点，宏给单元格换新装

　　下面我们来执行这段宏。

　　(1)选中需要设置的任意单元格或单元格区域(为了看出效果，单元格最好有字符);

　　(2)打开菜单—>工具—>宏—>宏，显示“宏”对话框(快捷键：Alt+F8);

　　(3)选择我们刚才录制的宏，单击“执行”。

　　这样我们看到已经为刚才选中的单元格的字体已被修改成仿宋体，红色。自己动手试着录制几段宏，再执行一下，加深印象。

　　神奇了吧?以后当你再需要一遍又一遍地重复若干相同的操作的时候，会不会想到让宏来替你做这一切?这是一个不错的奴隶，不用花钱，且不用开工资，赚了吧?

　　好了，收起你贪婪的笑容，继续往下看。

　　宏是什么?现在相信你能想出一千种说法，由你了，又笨又懒的叶枫可没你聪明，也不再多说。

　　上面说的执行宏的过程是不是让你感觉很麻烦?

　　希望用快捷键来控制宏?这个我们可以在录制宏之前在录制宏对话框里进行设置。也可以在录制宏后进行设置，按Alt+F8显示宏对话框，单击“选项”，在“宏选项”对话框里进行设置

　　3、寻根问底，找到宏的老窝

　　如果你忘记了，请你再打开宏录制对话框，在宏名的下面，有一个“保存在”的选项，点一点下拉的箭头，我们可以看到，宏可以保存在三种不同的位置，分别是：

　　(1)当前工作簿(系统默认)：宏保存在当前工作薄的模块里，只有当该工作薄打开时，宏才起作用。

　　(2)新工作簿：新建一个工作薄保存。

　　(3)个人宏工作簿：这是为宏而设计的一种特殊的具有自动隐藏特性的工作簿，如果你要让某个宏在多个工作簿都能使用，那么就应当创建个人宏工作簿，并将宏保存于其中。

　　上面我们录制的宏是保存在当前工作薄里，今天我们在这里也只介绍保存在当前工作表里的宏。

　　4、拨开层层迷雾，查看庐山真面目

　　宏靠什么来控制Excel的运行?是不是感觉深在浓浓的迷雾里，感觉一头雾水?让我们鼓一鼓劲，拨开它的衣服，开开那家伙里面到底是什么?

　　(1)按Alt+F8快捷键打开“宏”对话框;

　　(2)选择我们刚才录制的宏，点“编辑”按钮。

　　眼前一亮吧?这是一个新的天地——VBA的编辑器窗口(VBE)，这个我们以后再说，先将注意力集中到显示的代码上。代码如下：

　　Sub mysub()

　　' mysub Macro

　　' 宏由ggsmart录制，时间: 2020-10-15'

　　With Selection.Font

　　.Name = "仿宋_GB2312"

　　.Size = 12

　　.Strikethrough = False

　　.Superscript = False

　　.Subscript = False

　　.OutlineFont = False

　　.Shadow = False

　　.Underline = xlUnderlineStyleNone

　　.ColorIndex = xlAutomatic

　　End With

　　Selection.Font.ColorIndex = 3

　　End Sub

　　现在你可能感觉到上面这些乱七八糟的代码会很陌生，甚至在问自己是不是来到外星人的世界，反正叶枫当初是这样感觉的，但不要为此感到害怕，将来我们会慢慢熟悉他，就像闭上眼睛也能准确地将那个又大又红的苹果送到自己的嘴里。

　　5、再进一步，给宏安上门铃

　　一遍一遍地在宏对话框里选择宏名称，按“执行”按钮来运行宏的麻烦是不是让你郁闷得有些想吐血?指定快捷键虽然方便，但别人用自己的工作表时能不能快速上手?

　　就算是自己，如果宏多了，或是放的时间长了，你还记得哪个快捷键控制哪个宏?

　　作为excel开发者，一个主要的目标是为自动化提供一个易于操作的界面，“按钮”是最常见的界面组成元素之一，我们可以把宏指定给特定的按钮，通过按钮来执行宏，还是用刚才我们录制的那个宏来举例。通过使用“窗体”工具栏，可以为工作簿中的工作表添加按钮。在创建完一个按钮后，可以为它指定宏，然后你的用户就可以通过单击按钮来执行宏。在本练习中，将创建一个按钮，并为它指定一个宏，然后用该按钮来执行宏。

　　具体步骤如下(Excel2003为例)：

　　(1)打开菜单—>视图—>工具栏—>窗体，调出窗体工具栏。

　　菜鸟谈VBA最基础入门

　　(2)单击”窗体“工具栏中的“按钮”控件，在工作表中希望放置按钮的位置按下鼠标左键，拖动鼠标画出一个按钮，松开鼠标后，Excel会自动显示“指定宏”对话框。

　　菜鸟谈VBA最基础入门

　　(3)从“指定宏”对话框中选择“mysub”，单击“确定”。

　　这样，就把该宏指定给命令按钮。

　　课间休息：

　　按钮,工作表等这些对象就像是Excel的众多儿女,儿女太多,怎么称呼这群儿女也是一个问题。

　　为了不出现叫"儿子"就七八个一起跑出来，同许多农村父母给儿女起"老大，老二，老三……"的称呼一样，Excel也用这种顺序的起名方法给这些儿女贴上了标签：

　　比如第一个按钮是"按钮一"，再画一个就是"按钮二"，然后是"按钮三"，"铵钮四"等等.这样，以后你要叫第三个儿子的时候直接叫"按钮三"即可。

　　如果你嫌这个名字乡下味太浓，如果你嫌这个名字不能很好地反映点击它后会执行怎样的操作不清楚，你可以通过双击按钮表面激活它，可重新为按钮贴上合适的显示标签。

　　需要提醒你的是，这里的标签只是它显示在你面前的样子，实际上它是什么名字?我们可以点击它，看一下名称框里是什么.

　　菜鸟谈VBA最基础入门

　　为什么显示出来的是一样，而实际的名字却是另一样呢?

　　也许你现在会感到迷茫，但不用管它，以后当我们学习了属性后，一切就自然明白了.

　　下面我们来试一试用按钮操作：

　　(1)选择单元格或单元格区域;

　　(2)单击按钮。

　　菜鸟谈VBA最基础入门

　　按钮就像装在楼下的门铃，美丽的嫦娥仙子家住在502，猪八戒来到楼下，找准号码502，轻轻一按，“叮咚，叮咚……”，嫦娥在楼上就给八戒开门了，八戒不用在楼下大声地喊“嫦娥，开门。”

　　也不用花两毛钱给嫦娥打个电话，当然更不用顺着下水管从墙上爬进嫦娥的窗户，方便而实在吧?

　　这种遥控式的命令的确能让繁琐的操作变得简单而方便，让我们获得了一些使用Excel标准命令所不能实现的功能。

　　如果你是八戒，当你熟悉了如何使用这种遥控一样的门铃以后，你可能都会奇怪自己当初在没有门铃的情况下，那段漫长的爬下水管道的日子是怎么熬过来的。

　　让嫦娥仙子开门的方法有很多种，同样执行宏也有多种方法可以选择，我们还可以把宏指定给图片，自选图形，这些比较简单，和指定给窗体按钮是一样的，同时我们还可以把宏指定给某个“事件”，比如单击工作表，双击工作表，激活工作表，打开工作簿等等，你要安什么要的门铃，选什么样的音乐，随你了。

　　需要强调一点的是，我们刚说的“事件”是一个重要的概念，八戒按门铃，就是一个“事件”，这个“事件”引发了嫦娥的开门，只有门铃响了，嫦娥才会去开门。除此而外“方法”“对象”“属性”都是接下来我们会经常接触到的，慢慢走，留心点，一路上将会精彩不断。

　　到这里，我们对宏应该有一个简单的了解了吧?

　　宏实际上就是一个简单的VBA的Sub过程，它保存在模块里，以Sub开头，以End Sub结尾，执行时就从第一句逐句执行，直到End Sub结束。

　　就像前面我们说的武术运动员练的那段套路动作，总是抱拳，扎马，出拳然后踢腿，永远不可能没有扎马就出拳，没有出拳就踢腿。

　　我们今天录的这段宏也总是先设字体，再改字体颜色，这种顺序永远不会乱。

　　说完这些，你是不是感觉这些操作古板得没有生气?是不是感觉这宏的操作不能满足自己的需求?

　　叶枫想告诉你的是，宏代码绝不等于VBA，它只是VBA里最简单的运用，尽管许多Excel过程都可以用录制宏来完成，但是通过宏代码还是无法完成许多的工作，如：

　　(1)不可以建立公式，函数;

　　(2)没有判断或循环的功能;

　　(3)不能进行人机交互;

　　(4)无法显示用户窗体;

　　(5)无法与其他软件或文件进行互动。

　　…….

　　所以，你看了上面的内容后千万不要以为宏就是VBA了，更不要以为自己已经会VBA了，事实上是你才刚沾上VBA的边，或者说连边都没沾上，甚至连宏今天我们都只是作了简单的介绍。

　　路漫漫其修远兮，还等着我们上下去求索，路在脚下，武林高手总是从练习简单的套路动作开始，不要厌倦扎马的单调，静下心多练练，这会是你以后练习武功招式的一个基础。

　　什么是VBE?

　　相信你还没忘记吧?VBE就是VBA的编辑窗口，所有的VBA操作都在VBE里完成。

　　VBE是一个分离出来的应用程序，它可以与Excel无缝结合，但是需要说明的是要运行VBE必须先运行Excel，VBA模块与Excel工作薄文件一起存储，除非激活VBE，否则VBA模块是看不见的。

　　1、运行Excel后，怎样切换换到VBE窗口?

　　打开大门的钥匙有很多把，千万别猴急地去爬下水管道。

　　(1)按ALT+F11快捷键;

　　(2)右击工作表名称标签，点击查看代码。

　　菜鸟谈VBA最基础入门

　　(3)单击开发工具选项卡里的“Visual basic”命令。

　　初识VBE窗口

　　这个界面相信你不陌生吧?查看宏的时候我们已经见识过它了。

　　菜鸟谈VBA最基础入门

　　“工程资源管理器”显示一个树型图示，包含了当前在Excel中打开的所有Excel对象，包含工作表，模块，窗体，加载宏及隐藏的工作薄，每个工作薄被认为是一个工程。

　　在工程资源管理器里右击，可以在右键菜单里选择相应的命令插入模块或窗体。

　　如果你想删除它或者保存它，同样也可以在这里进行相应的操作。

　　菜鸟谈VBA最基础入门

　　“属性窗口”显示当前你选择的Excel对象的属性。

　　选中某个对象后，可以在属性窗口中修改选中的对象的的各样属性.如颜色，名称等。

　　菜鸟谈VBA最基础入门

　　“立即窗口”，这是一个非常有用的窗口，在其中可以直接执行VBA语句，测试语句和调试代码，就跟我们在DOS下输入DOS命令一样。

　　如果你的立即窗口不可见，按CRTL+G调出来，可以在里面尝试输入：

　　[a1]=”我在学习VBA”

　　回车，看一看A1单元格里发生了什么变化?

　　菜鸟谈VBA最基础入门

　　“代码窗口”是干嘛用的?

　　相信你已经很清楚了，当然是用来编辑VBA代码的地方，工程中的每一项都有一个与之相关联的代码窗口。

　　如果要查看某对象的代码窗口，或者说如果要查看某对象上面究竟编写了什么VBA代码，在“工程资源管理器”窗口中双击对象即可。

　　菜鸟谈VBA最基础入门

　　当然，你打开后的窗口不一定和上面一样，VBE的窗口也不只上面几个，我们可以打开“视图”菜单，在里面进行选择需要显示的窗口。

　　菜鸟谈VBA最基础入门

　　对象、属性、方法，事件

　　这是很重要的几个概念，是写VBA程序的基础，大家仔细读，一定要弄清楚。

　　1、对象及对象层次结构

　　对象就是存在的东西，是VBA处理的内容，包括工作薄、工作表、工作表上的单元格区域、图表等等。

　　对象可以相互包含，就像一个文件夹里可以包含多个文件夹一样，而这个文件夹又可以被其他的文件夹包含，一个工作薄对象可以包含多个多个工作表对象，一个工作表对象又可以包含多个单元格(或图表,图形等)，这种对象的排列模式称为Excel的对象模型。

　　集合这个概念经常遇到，我理解的集合是对相同类型的对象的统称。

　　某中学有5000个学生，名字各不相同，我们对他都统称为某中学的学生，而不和一一去叫他们的名字，"某中学的学生"在这里是集合。

　　对象的引用，在Excel里，Workbooks集合包含在Application对象里，当我们要引用某工作薄的时候，要遵循从大到小的规则。

　　跟表示硬盘里的某个文件的位置一样，比如我们想引用D盘“我的文档”文件夹下的名为“我的VBA课程.doc”文件时要输入的是：

　　D：我的文档我的VBA课程.doc

　　同样，如果我们要引用名称为“mybook.xls”的工作薄时就是：

　　Application.Workbooks(“mybook.xls”)

　　和引用文件不同的是，VBA里使用的分隔符是点。

　　同理，当我们引用“mybook.xls”里面的工作表“mysheet”时应是：

　　Application.Workbooks(“mybook.xls”).Worksheets(“mysheet”)

　　可以继续延伸到下一层，引用“mybook.xls”里工作表“mysheet”里面的单元格区域“A1:D10”： Application.Workbooks(“mybook.xls”).Worksheets(“mysheet”).Range(“A1:D10”)

　　但是并不是每一次引用都必须这么呆板，就像猪八戒不用每一次都去爬下水管道。

　　如果我们引用的是活动对象，也就是被激活的对象，引用就可以进行简化。

　　如果是mybook工作薄是激活的，引用可以简化为：

　　Worksheets(“mysheet”).Range(“A1:D10”)

　　如果mysheet当前也是激活的，引用甚至还可以简化为Range(“A1:D10”) ，也可以直接输入[A1:D10] ，如果引用的单元Range是单个的单元格，还可以用Cells(行号,列号)的引用方式。

　　2、属性

　　每一个对象都有属性，一个属性就是对一个对象的一个设置。

　　猪八戒背着媳妇高秀兰回自己的紫云洞，猪八戒的媳妇就是对象，“高秀兰”就是猪八戒的媳妇的一个属性(name属性)，引用对象的属性同样也要用点来分隔。

　　猪八戒的媳妇.name=高秀兰

　　别闲着，还是动动你的右手，打开一个工作表，Alt+F11(千万别说你不知道这个快捷键是干什么，要不我保证被你气个半死)，如果立即窗口没有打开，按Ctrl+G打开，在里面输入：

　　Msgbox Worksheets(1).name

　　回车。

　　菜鸟谈VBA最基础入门

　　Worksheets(1)和Worksheets(“sheet1”)有什么区别?

　　Worksheets(1)表示Worksheets集合里的第一个工作表。

　　Worksheets(“sheet1”)表示Worksheets集合里名为"sheet1"的工作表。

　　至于Msgbox是什么，那就自己问Help了，在立即窗口里用鼠标左键把Msgbox抹黑，按F1，就弹出Help里对它的说明了。

　　抹黑代码，再按F1即可看到相应的帮助。

　　叶枫说：“这个办法很适用，一般人我不告诉他。”

　　菜鸟谈VBA最基础入门

　　一个对象有哪些属性我们可以在属性窗口里查看，要修改一个对象的某种属性，如名称、显示状态、颜色等等，也可以在属性窗口里进行修改，当然我们还可以利用代码进行修改。

　　改当前工作薄里的第三个工作表的名称为“这个名字是我用VBA改的”，想想怎么写代码?

　　把你的代码输在立即窗口里，回车，看看效果，你做到了吗?

　　3、方法

　　每一个对象都有方法，方法就是在对象上执行的某个动作。

　　和属性相比，属性表示的是对象某种状态或样子，是静态的，就像是语文里的名词、形容词和副词，而方法则是做某件事的一个动作，就像动词，对象和方法同样用点来分隔。

　　例如Range对象有有一个方法是s elect，他的作用是选中指定的Range(单元格区域)对象，在立即窗口里输入代码：

　　Range("D1:F10").s elect

　　回车，可以看到D1:F10已经被选中了。

　　菜鸟谈VBA最基础入门

　　4、事件

　　在上面猪八戒按门铃那里，我们已经接触过什么是事件了。

　　简单点说，事件就是由用户或者系统触发的，可以在代码中响应的一段代码。

　　比如，当我们移动鼠标，打开工作薄，激活工作表，选中单元格，改变单元格的数值，点击按钮或窗体，敲击键盘等等这些都会产生一系列的事件，通过编写代码响应这些事件，当发生此类事件时，程序代码就会进行相应的操作。

　　这样解释你会不会有些晕?

　　感觉又一次进入了外星人的世界?

　　还是举例说明，我们需要当激活某工作表的时候，自动弹出一个对话框，告诉我们激活的工作表的名称。

　　(1)打开一个工作表，Alt+F11打开VBE窗口，在“工程对象管理器”窗口里双击你要进行设置的工作表，使其代码窗口显示。

　　(2)左面选择对象Worksheet(工作表对象)，右面选择Activate事件，我们可以看到在代码窗口里系统已经为我们自动输入了一段代码。

　　Private Sub Worksheet_Activate()

　　End Sub

　　提醒:

　　初学的我们，不必完全记住对象及事件的名称，也不必手工输入，系统早为你准备好了，你可以在代码窗口里进行选择，左边是对象，右面是事件，如果你想知道某个对象(例如工作薄、工作表、窗体等)有哪些事件，只需要双击这个对象，然后在代码窗口里查看即可。

　　我们需要做的只是:当自己需要它的时候,知道打开哪个箱子把它拿出来即可.

　　菜鸟谈VBA最基础入门

　　废话说完，再回到问题里：

　　要达到问题的目的，我们只需要在已给我们列出的两段代码中间加入需要进行操作的代码就可以了，这里我们需要的是一个对话框来提醒，对了，还记得Msgbox吧?

　　输入代码：

　　MsgBox "你现在激活的工作表名称是：" & ActiveSheet.Name

　　上面的代码相信你应该能看懂吧?

　　&和我们工作表里的函数是一样的，连接文本的作用，Activesheet.name是当前活动工作表的名字(用了一个name属性)。

　　回到工作表，激活你刚才设置代码的工作表，如果你刚才设置的工作表是激活状态，请选择其他工作表，然后再重新激活它，看看你看到了什么?

　　菜鸟谈VBA最基础入门

　　看一下上面的代码，对象和事件之间用什么来分隔?

　　还是不是点?

　　千万别懒，一定要动手，换其他的事件或其他的对象试一试，试着用代码改一下其他对象的属性，在单元格里添加点什么东西，这些随你了，你可千万别说你不知道哪些事件是干嘛用的。

　　别忘记，抹黑代码，按F1，再重复一遍，这是一件好武器，一般人我不告诉他。