Excel VBA能做些什么？

　　简单地说，就是模拟人工操作，完成一些挺繁琐的事情。比如：从网上复制到Word的文章，格式很乱，你就可以自己写一个宏，来自动完成整理工作，而不是人工一点一点地改，那样太累了。

　　主要用途如下：

　　1、使重复的任务自动化

　　2、自定义EXCEL工具栏，菜单和界面

　　3、简化模板的使用

　　4、自定义EXCEL，使其成为开发平台

　　5、创建报表

　　6、对数据进行复杂的操作和分析

　　以下是Visual Basic for Application的一些部分代码用途案例：

　　1、本示例为设置密码窗口(1)

　　If Application.InputBox(“请输入密码:”) = 1234 Then

　　[A1] = 1 密码正确时执行

　　Else:MsgBox “密码错误，即将退出！” 此行与第2行共同设置密码

　　End If

　　2、本示例为设置密码窗口(1)

　　X = MsgBox(“是否真的要结帐?”, vbYesNo)

　　If X = vbYes Then

　　Close

　　3、本示例为设置工作表密码

　　ActiveSheet.Protect Password:=641112 ‘ 保护工作表并设置密码

　　ActiveSheet.Unprotect Password:=641112 ’撤消工作表保护并取消密码

　　4、本示例关闭除正在运行本示例的工作簿以外的其他所有工作簿，并保存其更改内容。

　　For Each w In Workbooks

　　If w.Name ThisWorkbook.Name Then

　　w.Close SaveChanges:=True

　　End If

　　Next w

　　每次打开工作簿时，本示例都最大化 Microsoft Excel 窗口。

　　Application.WindowState = xlMaximized

　　5、本示例显示活动工作表的名称。

　　MsgBox"The name of the active sheet is"& ActiveSheet.Name

　　6、本示例保存当前活动工作簿的副本。

　　ActiveWorkbook.SaveCopyAs"C:/TEMP/XXXX.XLS"