第五章Excel在财务管理中的高级应用.doc

个人收集整理 勿做商业用途
在财务管理中的高级应用

5.1 Excel模板简介
5.1。1 Excel摸板功能及其创建
Excel摸板是一种用来生成其他工作簿的格式文件。由一个摸板文件生成的文件,可包括与摸板文件特征相同的布局、文件、数据公式、设置、样式、名称、宏、工作表控制以及Visual Basic模块表每一个由模板文件生成的工作簿是模板的复制品。模板在财会管理、制作报表的数据录入、支出账项以及保证个分支部门预算规范的一致性方面是十分有用的。
Excel模板与普通工作簿在形式上是完全一样的,但是功能上有如下两个基本区别。
（1） 工作簿是一次应用的，模板是多次应用的。打开一个模板时仅打开模板的复制件而不是模板本身。
（2） 模板文件的扩展名为。xlt
除此而外，工作簿模板与工作没有什么不同。
1 创建和存储工作簿模板
创建模板与创建工作簿文件完全一致。开始时，创建Excel的工作表、图表或其他文件，然后加人数据、格式的文件所需的其他信息,最后以模板文件类型存盘。
（1） 创建一个工作簿模板的实质是在通常的工作表编辑环境下，设计好一个工作簿的表样。设计的工作簿包含模板所需要的全部内容（如表格布局、数据、文本、格式、公式、以及控制等）.所谓创建模板就是它存为模板形式，步骤如下：
① 选取Excel文件“Excel另存为“命令；
② 输入模板名称，按通常方式选取存放模板的文件目录;
③ 在Excel“另存为”对话框中选择保存类型为Excel“模板”，它自动将扩展名。xlt加到文件后，如图5—1-1所示；
④ 单击Excel“保存”按钮.
注意:在Excel“文件名”文本框内，仅仅将文件扩展名改写成.xlt并不能将文件夹及模板格式存储，一定不能忽略上面的第4步。
（2） 自动模板
要改变Excel的缺省、（默认）字体、格式、保护状况等工作属性，最好生成一个自动模板。例
如,可以生成一张工作簿的自动模板，它包括用户名字或当前日期作为脚注。如果将一个模板文件以名字BOOK存入目录C：\MYDOCUMENTS\HY下，该模板文件称为自动模板,它为用户所建的一切新工作簿赋予模板式样，实际上它控制所有新工作簿的样式和内容.生成自动模板的步骤如下：
① 打开或创建一个用所有新工作簿样式的工作簿，如必须的数据、公式以及所需要的格式；
② 选取“文件”“另存为”命令;
③ 在“文件名”文本框键入Book，如图5-1-2所示;
④ 在“保存位置”处选取C：\MYDOCUMENTS\HY;
⑤ 从“保存类型“列表框内选取”模板“，它将扩展名.xlt加到文件后；
⑥ 单击“保存”按钮。
在生成自动模板后，每当打开一个新工作表（例如选取命令“文件”“新建”，或凌晨击常用工具栏的“新建”按钮），新工作表自动命名为BOOK的模板样式。因为利用模板创建的新文件都以模板名加一个整数的形式命名,所以模板名不宜过长，以不超过6个字符为宜。

5.1.2 维护和使用模板

创建、存储工作模板是为了使用模板.为了更好地使用模板,还应对模板进行一定的维护。
1 从模板创建工作表
打开一个模板将生成一个以模板为基础的新工作表文件，但模板本身并不改变，新文
件使用临时文件名.例如，槿板文件为“工业企业财务报表.XLT”,新文件名则为“工业财务报表1.XLS、工业企业财务报表2。XLS等。
根据模板创建的不同形式,从模板创建工作表的方式有所不同。但有一个共同点是，要用模板创建工作表,该模板一定不能以模板文件本身打开.
① 如果创建模板未存放在目录C：\MYDOCMENTS\HY下，则只能使用“文件”“打开”命令，在“打开”对话框中直接选择模板文件打开。注意这时并非打开模板文件本身，而是一个与模板文件内容完全相同的工作表文件。
② 如果创建的模板存放在C：\MYDOCUMENTS\HY目录下，但名字不是BOOK.XLT（即非自动模板P，而且在该上目录下没有自动模板文件,则除了用“文件"“打开"命令外，使用“文件”“新建”命令将打开一个“新文件”对话框，该对话框内显示所有C:\MYDOCMENTS\HY目录下模板,用户可从吕选择一个模板用于创建自己的工作簿文件。
③ 如果创建了一个自动模板，除了用“文件”“打开”命令外,也可以使用“文件"“新建”命令。这时不打开“新文件”对话框，而是直接按自动模板创建新文件，如图5—1-3所示。
如上所述，虽然可以打开一个存于任何一个下模板用“文件夹”“打开”命令，但只
有存于目录C:\MYDOCUMENTS\HY下的模板才能出现在“新文件"对话框内供调用.如果建立闻自动模板,又要使用他模板文件时，也只有使用“文件”“打开”命令。
在图5—1—3中单击“确定"按钮,则会出现图5-1—4所示资产负债表模板，它是在“工业企业财务报表.xlt ”文件下的。
如果要用“工业企业财务报表.XLT的其他模板，另创建一张完全相同的工作表文件，直接用“文件”“打开"命令选中文件“工业企业财务报表.XLT”，按回车建。如果该模板文件存储在C：\MYDOCUMENTS\HY下，使用“文件"“新建"命令从新文件对话框内选择“工业企业财务报表.XLT”,按回车键。
2 编辑模板
一个模板应当反映不同时间的要求，因此需要有时随时修改.可像编辑普通工作簿一样编辑模板文件.但是,打开模板文件与打开普通文件有一点区别，否则打开的就不是模板文件本身而只是它的复制件。在这种情况下，不能对模板文件做任何修改.如果要编辑模板文件，必须打开模板文件本身，过程如下：
① 选取“文件”“打开”命令，或单击常用工具栏的“打开”按钮；
② 在“打开"对话框内，选取想要编辑的模板文件名；
③ 按住Shift键，单击“确定”按钮.
因为在第3步按住了shift键，打开的就是模板文件本身。编辑后，再选“文件”“保存文件”命令，将修改后模板文件以同名存盘。
2 插入工作表模板
有时，用户需要组装若干个不同类型的模板到工作簿中。把一个模板插入人当前工作簿之内，其步骤如下：
① 移动鼠标指针至想要插入模板表其前的工作表标签，然后单击鼠标右键；
② 选取“插入"命令，弹出“插入”对话框（见图5-1—5）,其中包括早先建立的模板文件“工业企业财务报表.XLT“；
③ 选取想要插入的模板表，此处为“工业企业财务报表。XLT;
④ 单击“确定”按或按回车键。

5.1。3模板格式设计
模板格式设计包括表样格式设计、公式设计（与宏设计有关）以及显示形式设计三方面内容。表样格式设计是指按照实际报表的格式，在Excel上进行的报表式样的设计。图5-1-4所示的资产负债表就是工业企业常用的表样格式,关于报表格式设计将在第6章报表模板应用实例中进行详细介绍。公式设计（与宏设计有关)我们将在5。2节中进行介绍。此处主要介绍显示形式的设计。

1格式设计的必要性
由于Excel的数据格式定义比较复杂,有时难免遇到一些问题。本节主要介绍一些常用的格式定义技巧.
如果读者使用的是Office 97版本的Excel,当然启动Excel，并在“文件”菜单下选择“新建"时,选择“电子表格模板”,您会看到许多电子模板，如图5-1—3所示。其中包括各种行业的会计报表，您可以选择一个适合本单位的会计报表。这种报表可能并不完全适合本单位，您可以对它进行修改，使之成为一个可用的报表模板.图5-1—4是工业企业财务报表模板中的资产负债表模板。

2 格式化数字
当在Excel里往单元格输入一个数字时,这个数字不可能以输入时的数值形式出现在工作表里,例如某些尾零可能已经被遗漏了。Excel把所有的数字和日期都作为数字存储起来,在屏幕上显示的数字或日期都是被数字格式化了的。
Excele有许多定义好的数字和日期/时间格式.另外,用户可以设计自己的宣称格式，可以包括用户指定的字符和符号，指定想要的十进制精度，并能应用16种不同颜色中的任何一种。这些格式和颜色甚至能够根据单元格里的数值范围来进行改变。
没有使用的、或者已经被清理的单元格具有常规数字格式，这意味着Excel用要能是最高的精度显示一个数字。如果这个数字太大或太小，就用科学格式来显示.例如：5.367E+0.5.如果一个数字或日期还是太大以致于不适合指定的格式,这个单元格就用#符号来填充。
（1） 了解格式化数字的潜在危险
在屏幕上出现的格式化数字不可能具有计算中使用的数字相同的值。这个差异造成显示的或打印的结
果与手工计算的结果不一样。
为建立用户自己的整个工作表,以便使显示的数字与那些用在计算里的数字匹配,选择“工具（T）”“选项（O)”命令，“重新计算”标签。选择“以显示值为准（P)”复选框(当选择“确定"按钮时，将会被警告:“数据将永远失去其精度”）。
用户也可通过使用Excel中的ROUNDO涵数来设置选定单元格的精度。例如，可以在E5单元格里使用公式“=ROUND（B5*C5，2）”，这个公式在求和前对相乘的值进行了舍入处理。在做前一步的计算前总是要舍入的。
（2） 使用Excel的自动数字格式
存储在单元格里的数字、日期的时间都是纯粹的数字，没有经过格式化。然而，Excel要考察输入的数
字格式，以决定这个应用程序是否能够格式化一个单元格。例如把数字#12.95输入到一个使用默认的常规格式格里,那么E xcel将格式化这个单元格为贷币使用。
若输入到一个百分数（如15％)到一个使用常规格式的单元格里，那么虽然它在公式上是15，而在工作表里看到它却是15％。
警告：如果一个单元格里填写有#字符，那么按当前的格式,它的列就没有足够的宽度来容纳装入的数字。为了解决这个问题，加宽列宽。如果对这个列的加宽引起了工作表其他地方的格式化问题，使用TEXT(）涵数来把这个数字改变成文字。数字或日期能够超过单元格的宽度，并可以有任何格式，包括自定义的格式。
（3） 设计自定义数字格式
用户可以为金融或科学试验任务设计自己表示数字的格式,并为编制数字目录、电话号码、各国货币
等等创建各种不同的格式。无论何时，当需要用特殊的方法显示数字时,都可根据需要使用自定义的数字格式.
附注：
Excel包括了一些用于社会保险号数字和电话号码的特殊格式,如果这是想要创建的格式类型、就不必再创建自定义的格式了.需要做的事情仅仅是在分类列表中选定特殊项，然后选定所想要的格式。
① 了解自定义数字格式
创建一个定义数字格式是很容易的，但需要了解几个Excel用来定义一个数字码的符号。为了创建自己的数字格式，需要在数字标签里把这些符号输入“类型（T）”字框里去。
创建的自定义格式有4个部分.就像下面所示的语法例子:
positive format; negative format； zero formt; text formt
请注意，每一部分都被一个分号所分开.第一部分指出一单元格里正数的格式，第二部分指出一单元里负数的格式，如此等等。
使用的符号作为占位或格式指示符。请注意,0作为一个占位符，并且在没有任何数字被显示的位置上显示一个0。
符号—）跟在一个正数格式后面，以保证在这个正数右边留下一个空格，它的宽度和右圆括号一样宽，负数用圆括号括起来.正数和负数都靠每列的右边对齐。
为了了解格式的每一部分是如何工作的，考察下面的自定义格式例子：
$#,##0-）；（＄#,##0）；“Zero”
它将显示一个以$#,#＃-）格式表示的正数,以（＄＃，#＃0)格式表示的负数，而文字Zero表示一个0。例如：3550将以$3,550形式出现。—3550将以(＄3,550）形式出现，并且0将以单词Zero形式出现。
当创建一个自定义格式时能够使用的符号将在图5—1-6中介绍.

② 创建自定义数字格式
可在工作表的任何要方创建自定义数字格式，遵循下面的步骤：
选定想要使用自定义数字格式的单元格；
选择“格式（O）”“单元格（E)"命令；
选定“数字”标签；
在“分类(C)"的列表里选定“自定义"；
如果已经存在的格式和想要创建的自定义格式差不多，从这个列表里选定这格式；
在“类型（T）”文字框里编辑这个自定义格式图案；
选择“确定”按钮。
在创建一个自定义数字格式之后,在单元格里输入一个合适的数字，然后用正数、负数和零值测试这个
自定义格式。
可在工作表的任何单元格中重新使用定义的格式，这只需要通过选定自定义分类,流动到这个列表的底部，然后选定任何自己预定义格式就行。
③ 删除自定义格式
为了删除一个自定义格式,遵循下面的步骤：
选择“格式(O)”“单元格（E）"命令;
选定“数字”标签；
在“分类(C）”列表里选定“自定义"，然后选定想要从这个列表里删除的格式；
选择“删除(D）”按钮。
提示:不能够删除内置格式.
④ 利用数字显示文字
用户可以在自定义格式里的分号之间，通过把文字用双引号括起来,并把这些文字内容插到合适位置上
的方法，在同一个单元格中用数字来显示文字.单元格里的数字在计算时仍然作为一个数字 来使用，但显示时是作为文字来显示。例如用户想要让一部分数字总是在P/N后面，并且在最后三个数字前面显示一个连字符，那么创建一个如下的自定义格式:
“P/N”#＃＃-#＃;“ExcelUse"；”Enter Number”
用这个格式，其中的数字5768953将被显示成P/N5768—953;输入一个负数,将显示文字：Usr Positive；而输入一个零将产生文字：Enter Number。
（4） 用颜色格式化数据
彩色的文字或数字能够帮助用户发现数据项的差别或者认出标志数字(它们超出了某个范围)。单元格
的颜色格式化与单元格数字或日期格式化一起进行。
用户可在自定义的数字格式的合适部分用括号把颜色名字括起来,以指出要选择的颜色。例如在文字格式位置里的颜色格式改变文字的颜色.并且,如果想要使正数的格式是蓝颜色的，而负数的颜色是红颜色的，使用下面的格式：
[BLUE］$#,＃#0.00—;[RED]( $#，＃＃0。00)
用户可以使用八种命名了的颜色和任何一种自定义的颜色。用下面的颜色符号来指定颜色：
[BLACK］（黑色）
[WHITE]（白色）
[RED］（红色)
［GREEN](绿色）
[BLUE］(蓝色)
[YELLOW](黄色）
［MEAGENTA]（紫红色)
［CYAN]（青色）
［COLOR＃]（这里的＃是一个在颜色调色板上的颜色编号,从0号到56号）
用户通过选择“工具(T）”“选项（O）”命令和选定“颜色”标签，就可看支Excel的颜色调色板。在标准颜色都用数字进行了编号，顺序是从上往下，从左到右（最左上角落的颜色编号是1,最右下角的颜色编号是56）。
（5） 条件格式化
在用户定制的格式化中使用[condititon value］格式符号时，可以对一个单元格进行格式化,以便数
字用不同的格式可颜色出现，这依赖于数字的值.若将这个技术用在核查数据输入时出现的错误，来自分析的异常报告的执行程序信息系统方面告别有价值。
例如:下面的格式使得在单元格里的所有数字使用0。00 的数字格式。当数字大于可等于1，000时，数字就以黑色显示出来;当数字小于或等于500时，数字就以红色显示出来,对于在这 两个数字之间的数字都以蓝色显示出来。
[black］[>=1000]0。00；［read］［,=500］0.00；[blue]0。00
(6）隐藏零值
把零值隐藏起来常常能使工作表更容易阅读.在Excel里，把零值隐藏起来有3种选项：在整个工作表里都把零值隐藏起来；创建一个自定义格式;或者使用IF(）函数。
为了在整个工作表里把零值隐藏起来，选择“工具（（T）"“选项(O）”命令，选定“视图"标签，然后清除“零值（Z）”复选框。当想要又看零值时，再选定“零值(Z）”复选框。
为了使用自定义格式来把零值隐藏起来，在合适的部分使用分号以指出后面跟着零值格式，但并不为零数字输入一个格式，就像下面的格式一样:
$#，＃＃＃—)；（$#，###）；
在公式中，使用IF（）函数来隐藏一个零值，像下面的例子一样：
=IF（A12+B12=0,“”，A12+B12）
这个公式指出：如果A12+B12等于零时，Excel将显示引号之间的东西，上例中什么也不显示（要注意，
若使用一个空格将指示一个零；在有些数据库或在某些数字和文字函数里，空格会产生问题）.如果A12+B12不等于零，Excel就会显示出化工的计算结果。
（6） 关于数字格式化的提示
用户可以使用一个逗号格式(例如:#，#＃0）把要显示的数字三位三位地分开,这对显示那些具有千位或百位的数字就很有用，例如：用＄＃，＃#0，“M”(这里的逗号结束格式数字部）这样的格式来对数字12345689进行格式出来的结果为：＄123，457M.请注意，显示的数据被四舍五入了，而不是被截短了，紧接着的计算继续使用单元格里的实际数字，并不是显示出来的那个截短的数字.
当用户需要把一个数字安放在一个宽度较窄的列里时，使用TEXT（）函数去把这个数字或公式的结
果转换成方案形式，这个数字就能覆盖单元格边沿而不必转换成用##＃符号来显示。用TEXT（）函数把数字转换成还能够在其他公式中被引用 ，并将正确地进行计算.在TEXT（）函数里使用的数字公式可以是前面介绍的自定义数字格式之一。例如A12＊C35的结果太大，以至于没有安放在窄的单元格里，并且它需要一个货币格式,这时就可以在同一个单元格里使用己经使用过的A12＊C35的公式。
：EXT(A12＊C35，“＄＃，＃#0-）；（＄#,＃＃0)：0”)
疑难解答
问题：在格式化之后，较长的数字不再适合放在单元格里，这个数字太宽，并且显示出来是＃#＃#，而不再是数字.
回答：把列加宽，一直加到这个数字出现为止。也可以使用TEXT（）函数把这个数字或公式的结果转换成文字形式,这样这个文字就能覆盖单元格边沿.这个转换成文字的数字还能够在其他公式中被引用，并且可以为一个数字进行计算。
用户可以通过调整工作表里的列宽的行高以改善工作外观。合适的调整有助于在一页里放下更多的数据，甚至可以在一行或一列里隐藏保密的数据。
关于调整列宽、隐藏列，调整行高、隐藏列，调整行,添加颜色、图案和边框知识请参看第1章Excel
基础知识与基本支巧。
5．2 宏（VBA)及其在财会管理中的应用
在实际工作中，常会做一些财务管理分析模型。而每个财务管理模型都分散地放在相应工作簿的要作表中，财务管理人员需要使用该模型进行分析时,必须选择包含模型的工作簿所在的目录,选择目录中的文件（工作簿名字）打开工作簿,再选择具体管理模型据的工作表等，即每次使用模型都必须重复繁琐的操作步骤。为了减少不必要的操作，以及让更多的不太熟悉Excel操作的财务管理人员都能非常方便地使用已经设计好的模型,就需要就用Visual Basic For Application(简称VBA）宏技术，将设计好的模型组合起来，建立一个面向财务管理人员的财务管理系统。本节主要学习记录和编写宏和编写宏程序,并用宏设计用户界面、系统菜单，建立一个完整的财务管理系统的技术的方法。
5.2.1 宏语言概述
Excel支持VBA,即Microsoft s Visual Basic, Application Edition, 是从流行的Visual Basic编程语言中派生出的一种语言。Excel提供了其他工作所不能提供的一些更广和特性。然而无论Excel的特性有多广,在特殊行业与特殊情况下用户一定全要求更多的特性来满足其特别的需要。对会记录或书写宏的任何人，都可以添加特性、函数和命令到Excel，让Excel按需要工作。
Excel可以广泛地应用于财务、金融、经济、统计和审计等众多领域,它是一个强有力的信息分析和处理工具。这种力量的源泉之一就是它的宏语言(VBA）。利用职权VBA所提供的功能,财务管理人员可以按自动方式行日常的管理、分析、决策任务,还可按需要加入某些自定义功能，直至建立一个完整的财务管理应用系统.

1 建立宏程序
VBA是一种计算机编程语言（第四代语言），用它提供的语句、命令可以编写包含若干指令 序列的宏程
序，它可以指挥Excel应该进行哪些工作。
（1） 宏程序的概念
宏程序是指用VBA提供的各种函数、语句、对象、方法和属性等编写的程序。在Excel中也称为过程。
过程是在VBA模块中一个可执行的VBA程序代码块，过程有程序代码序列组成，这些代码序列组合在一起可以完成某项任务。
VBA中的过程主要可分为两类——子过程（Sub Procedure）与过程函数（Function Procedure）.
① 子过程
子过程以SUB语句开始，以END SUB语句结束.过程可以执行某种操作，但无返回值。其结构是:
SUB过程名（）
命令序列1
命令序列2
END SUB
② 过程函数
过程函数以FUNCTION语句开头，以END FUNCTION语句结束,并可以有返回值.
其结构是:
FUNCTION函数名胜古迹（参数…）
命令序列1
命令序列N
END FUNCION
（2） 建立宏程序的方法
宏程序存放在Excel工作簿的宏表中,建立宏程序的步骤：
进入“工具”“宏”下的“Visual Basic编辑器”，选择“插入”菜单中“添加模块”命令，Excel就会在工作簿中增加一张宏表,并命名为MODULEI，在宏表中建立友程序;或选择“工具”菜单中“宏”下的“记录宏"命令，Excel就会出现“停止录制”图标 ，用户可以对工作簿、工作表、单元进行各种Excel自动根据操作编制宏程序；当操作完毕时，按停止录制图标,完成一个宏表的制作.同时Exxcel在工作簿中也会增加一张宏表，并命名为MODULE 1。
2 宏程序结构与宏程序举例
宏程序是程序语言，所以它也有第三代语言一样的程序结构。
。顺序 （SEPUENTAL）；
循环（LOOP）；
条件（Condition)或Excel分支（Branching)。
（1） 顺序结构
在正常状况下，宏程序的执行是以“Excel顺序“方式进行的,即由上而下逐一执行.用“Excel宏记
录器”记录经常性工作时，它也是“Excel”顺序方式。
例一:编写一宏程序。
过程名为：PROL1
功能:xj10。XLS工作簿中的“ExcelSALE”工作中,B1单元赋一报表的标题“恒远公司财务分析”，C2单元赋日期“1998年8月”。
编程过程：
① 打开工作簿xj10。XLS；
② 进入“工具”“宏”下的“Visual Basic编辑器“;
③ 选择“插入菜单中“宏表”命令下的“模块表”命令,Excel就会在工作簿中增加一张宏表，并自动命名MODEL1；
④ 选择MODULE1宏表输入宏程序：
SUB PROL1（）
SHEETS （“ExcelSALE"）.SEKECT
RANGE （“ExcelBI”） .DORMULA=“Excel恒远财务分析"
RANGE（“Excel C7”).FORMULARICI=“Excel1998年8月"
END SUB
例二:编写一宏程序
函数名为：tax
功能：在CWGL10。XLS工人作簿中的MODULEL宏表中编写 一函数，即根据销售额（SALES）计算销项税（TAX）的函数。
编写过程：选择MODULEI宏表输入宏程序：
Function tax（sales)
Tax=sales*0。17
End Function
例三：编写一宏程序.
过程名为：PROL2
功能:在CWGL10。XLS工作簿中的“ＦＸ”工作表中按顺序分别给单元Ｂ１、Ｃ１、Ｄ１赋值１０、２０、３０.
编写过程：
选择MODULEI宏表输入宏程序：
Sub PROL20
Range(“ExcelB1”).value =10
Range(“ExcelC1”）。value =20
Range(“ExcelD1”）.value =30
Emd Sub
（２）分支结构
优势需要对默认条件测试,然后根据测试的结果进行不同的操作，这就要使用分支结构。
语法 １:
IF（condtiion）
Then（statements）
注意：在单行的IF…Then语句中不使用Ｅnd if语句。当测试的条件为TRUE时需要执行多行程序代码,则必须使用IF…THEN…END IF语句。
例四：编写一宏程序。
过程名为：PROL3
功能：如果“总销售额"大于等于５０万元，在屏幕上输出“完成任务，应给予嘉奖！”。
选择MODULE1宏表输入宏程序：
SUB PROL3 (）
IF 总销售额〉=50
THEN MSGBKX “完成任务，应给予嘉奖！"
END SUB
语法 ２：
IF (CONDITION) THEN
（STATEMENTS）
ELSE
（STATEMENTS）
ENDIF
例五：编写一宏程序。
过程名为：PROL4
功能：如果“总销售额"在于等５０万元，在屏幕上输出“完成任务，应给予嘉奖！”,否则在屏幕上输出“继续努力"。
编程过程：
选择MODULEI宏表输入宏程序：
SUB PROL4 （）
IF 总销售额〉=50 THEN
MSGBOX “完成任务，应给予嘉奖!”
ELSE
MSGBOX“继续努力”
END IF
END SUB
语法 3：
SELECT CASE (TESTEX PRESSION）
CASE （PRESSIONLST1）
(STAEMENTS）
CASE （PRESSIONLST2)
（STAEMENTS）
END SELECT
例六：编写一宏程序。
过程名为：PROL5
功能：根据实际销售量判断其是大于、等于、小于保本点销售量，决定输出“盈利”、“保本”、“亏损”。
假设：B2单元为实际销售量,并将该单元名定义为销售量,C1单元为保本点销售量，并将该单元名定位保本点销售量。
选择MODULE1宏表输入宏程序：
SUB PROL 5(）
SELECT CASE 销售额
CASE 销售额〈保本点销售额
MSGBOX “亏损！”
CASE 销售额=保本点销售额
MSGBOX“保本!"
CASE 销售额>保本点销售额
MSGBOX“盈利！"
END SELECT
END SUB
（3） 循环结构
语法 1：
DO WHILE (CONDITION）
（STATEMENTS）
LOOP
例七：编写一宏程序.
过程名为：PROL6
功能:当财务管理人员在不输入结束信息命令之前，以至进行数据整理，直到输入了结束信息FALSE后，退出本过程.
编写过程：
选择MODULE1 HONG宏表输入宏程序：
SUB PROL6（）
FLAG=VBYES
DO WHILE FLAG=VBYES
PROCESSUSERDAT’A调用过程整理成本数据
RESPONE=MSGBOX（“继续整理成本数据吗？[TRUE/FALSE]”，YES/NO）
LOOP
END SUB
语法2：
FOR counter=start TO end [step increment]
（statements）
next [counter］
例八：编写一宏程序。
过程名为:PROL7
功能:根据销售量的变化，计算相应的利润,如果利润大于0，输出“盈利",否则输出“亏损”。
假设：销售量从200变到300，每次增加10,单位变动成本、单价、固定成本等所在单元都已定义了名字。
编程过程:
选择MODULE1HONG宏表稷输入宏程序:
Sub PROL 7 （）
For销售量=200 TO 300 STEP 10
利润=（单价—单位变动成本）＊销售量—固定成本
IF 利润>=0 THEN
MSGBOX “盈利!”
ELSE
MSGBOX“亏损!”
END IF
EXIT
END SUB
语法2：FOR EACH （ELEMENT) IN （GROUP）
（STAEMENTS）
NEXT （ELEMENT）
例九:编写一宏程序
过程名为：PROL8
功能：关闭所有打开的工作簿。
编程过程:
选择MODULE1HONG宏表输入宏程序：
SUB PROL8()
FOR EACH BOOK IN WORKBOOKS （）
BOOK 。 CLOSE
END SUB
以上是利用VB（Visual Basic)编辑器来编写程序,来完成某段特定的过程。使用这种方法的人需要具有一定的计算基础；Excel还提供使用者一种简单易用的编制宏程序的方法，即宏记录器。
3 宏记录器的使用
Excel提供的宏记录器可以帮助财务管理人员所做的各种操作，当操作结束时，关闭宏记录器，宏程序
便保存在宏表中。宏记录下来之后，可以通过以下方法执行宏：
用“工具”菜单中选择“宏”命令；
将客观存在指给某个菜单项，通过选择菜单执行宏；
将它指定给宏按钮，通过驱动按钮执行宏。
（1） 记录宏的方法和步骤
① 选择“工具”菜单上的“记录宏”命令下的“录制新宏”命令；
② 在“宏名字”框中输入宏程序的名字，工程项名可以包括字母、数字和下划线；但必须以字母(某种文字)开头，名字中不能包括空格或标点符号；
③ 在“描述”框中，输入与要记录的宏有关的说明信息;
④ 选择“确定”按钮，此时［停止记录宏］按钮出现在屏幕上下 ；财务管理人员可以进行各种记录的操作，如选定单元格、输入标题、设置表格等;
⑤ 单击“停止录制宏”按结束宏记录。
（2） 记录宏实例
例十：在工作簿CWGL10.XLS 中，插入一张工作表，将该工作表名字改为“恒远财务管理系统界面”,
在C3单元输入标题“恒远财务管理系统”，将该标题的字号设置为14。并在该标题下划线，取消网格线。
记录宏的过程：
① 选择“工具"菜单上的“记录宏”俱下的“录制新宏"命令;
② 在“宏名字”框中输入宏程序的名字“info hy”
③ 在“描述”框中，输入与要记录的宏有关的说明信息；
④ 选择“确定”按钮，此时“停止记录宏”按钮出现在屏幕上;
⑤ 选择“插入”菜单上的“工作表”命令;
⑥ 将新插入的工作表名改为“恒远财务管理系统界面”；
⑦ 选择C3单元，输入标题“恒远财务管理系统"；
⑧ 选择标题, 单击“字号”工具，选择14;
⑨ 单击“下划线"工具;
⑩ 选择“工具”菜单上的“选项”命令,去除网格线;单击“停止记录宏”按钮，结束宏记录。
（3）记录的宏程序清单
info hy宏
丁力记录宏观 08/08/1998
Sub info hy (）
Sheets。Add
Sheets （“SHEET1"）。Select
Sheets （“sheetl”)。Name =“恒远财务管理系统界面”
Range （“C3”).Select
Activecell. FormualaR1C1 =“恒远财务管理系统”
Range（cC3:D3）。Select
With Selection. Font
Name =”Times New Roman”
Font Stye =”Regular”
Size =14
End With
Selection。 Font. Underline =xLSinge
ActiveWindow。DisplayGridines=False
End Sud
通过上述大量的宏程序可以看出，对于学习过其他编程语言的财务管理人员来说，编写宏程序并不困难，
只需要学习和掌握VBA提供的各种语句、对象的方法和属性等，就可以很快编出宏程序。对于没有学习过其他编程语言的财务管理人员或对宏语言不熟悉的财务管理人员，可以利用Excel提供的宏记录器自动记录您在Excel中进行的各种操作,也可以通过阅读这些宏程序,不断学习宏的编写方法。
值得注意的是，宏记录器编写的程序都是较简单的顺序结构的程序，如果需要比较复杂的结构如分支、循环等结构的程序时，财务管理人员对宏记录器中记录和程序进行修改便可使用。
4 宏的执行
宏记录下来之后，可在任何时间执行这个宏,Excel将执行在宏程序中的全部命令.当宏没有被指定到
宏按钮或菜单项时，只能按下列步骤执行.
① 在“工具”菜单中选择“宏"命令；
② 在“宏名字"框中选择宏名字“info hy";
③ 选择“执行”按钮。
5 利用宏设计自定义财务函数
在实际工作中，人们经常利用宏设计自定义财务函数。取数函娄数就是定义的一种。关于自定义函数的
内容不是本章的重点，当读者阅读到这部分内容以后，知道哪此函数是自定义函数就可以了。
5.2.2 用户界面的设计与使用
在实际工作中，我们会设计若干个财务分析模型，并将同一类模型存放在一个工作簿中,该工作簿的若干张工作表中存放着该类不同问题的模型.如果每个工作簿中实际是一个用户界面,就能使财务管理人员通过该界面一目了然了解到该工作簿中包含哪此模型，并通过驱动办界面上宏按钮直接进入各了模型，完成各种管理、分析、决策工作.
1 给图工具栏
选择“视窗”菜