【浅谈Excel中VBA的操作及在企业管理中的应用】 Excel VBA
时间：2019-03-29 03:16:59 来源：雅意学习网 本文已影响 人 
摘要： Excel可以广泛地应用于财务、行政、金融、经济、统计和审计等众多领域，它是一个强有力的信息分析和处理工具。利用其所提供的功能，财务管理人员可以按自动方式执行日常的管理、分析、决策任务，还可按需要加入某些自定义功能，直至建立一个完整的财务管理应用系统。
Abstract: Excel can be widely used in many fields, such as financial affairs, administration, finance, economy, statistics and auditing etc., and it is a powerful tool with information analysis and processing. Using its functions, financial management staff can perform day-to-day management, analytical, decision-making tasks in accordance with automatic mode, but also can add some custom function as needed, until establishing a complete financial management application system.
关键词： Excel；VBA；企业
Key words: Excel；VBA；enterprise
中图分类号：TP39 文献标识码：A 文章编号：1006-4311（2012）20-0231-02
1 财务模型的创建
财务模型所包含的范围很广泛，它从基础的工作表开始，汇总开支费用，到最后创建复杂的模型，都属于财务模型的范围。当用户要设计创建一个财务模型时，需要考虑到：①能否针对企业问题来解决。②分析处理数据的过程。③将数据转换为信息的过程是否快速、正确。④要清楚地了解到问题的关键所在与变化。
1.1 创建简单模型 在Excel中可以使用目标搜索、单、双因子What-If分析等技术，以不同的角度进行问题的模拟与分析。
1.2 模型扩充 ①将相关数据输入到Excel中。②输入各单元格公式。③计算“折现因子”。其中“折现因子”的公式为：折现因子=1/（1+折现率）^期数。
2 简要介绍Excel中VBA功能操作
VBA是一种计算机编程语言（第四代语言），用它提供的语句、命令可以编写包含若干指令序列的宏程序，它可以指挥Excel应该进行哪些工作。
宏程序是指用VBA提供的各种函数、语句、对象、方法和属性等编写的程序，在Excel中也称为过程。过程是在VBA模块中一个可执行的VBA程序代码块，过程由程序代码序列组成，这些代码序列组合在一起可以完成某项任务。
2.1 VBA中的过程主要可分为两类：子过程与过程函数
2.1.1 子过程 子过程以SUB语句开始，以END SUB语句结束。过程可以执行某种操作，无返回值。其结构是：
SUB 过程名（）
命令序列1
┇
命令序列N
END SUB
2.1.2 过程函数 过程函数以Function语句开头，以END Function语句结束，可以有返回值。
其结构是：
Function 函数名（参数…）
命令序列1
┇
命令序列N
End Function
2.2 宏程序结构与宏程序举例 宏程序是程序语言，所以它也有程序结构。
2.2.1 顺序结构 在正常状况下，宏程序的执行是以“Excel顺序”方式进行的，即由上而下逐一执行。用“Excel宏记录器”记录经常性工作时，它也是“Excel顺序”方式。
①打开工作簿的工作表。②进入“工具”菜单栏中“宏”命令下的“Visual Basic编辑器”。③选择“插入”菜单中“宏表”命令下的“模块表”命令，Excel就会在工作薄中增加一张宏表，并自动命名MODEL1。④选择MODELl宏表输入宏程序。
2.2.2 条件结构 如果需要对默认条件进行测试，然后根据测试的结果进行不同的操作，就要使用条件结构。
2.2.3 循环结构
语法1：
Do While （条件）
┇
Loop
语法2：
FOR counter=start TO end [Step increment]
┇
NEXT [counter]
2.3 自定义函数 自定义函数的结构与过程的结构非常相似，只是自定义函数的参数是必不可少的，且具有返回值。其基本结构如下所示：
Function 〈函数名〉（〈参数1〉，〈参数2〉，…）
〈语句块〉
End Function
例如用Excel定义个人所得税计算函数。
2.3.1 自定义税率 打开一个工作簿后，选择“工具”/“宏”/“Visual Basic 编辑器”进入VBA环境中，再选择“插入”/“添加模块”，在Module-1窗口中，输入以下程序，便可以在本工作簿中使用此函数。
Public Function 税率（x）
If x<=0 then
税率=0
Elseif x<=500 then
税率=0.05
Elseif x<=2000 then
税率=0.1
