Excel 编程备查.docVIP

Excel 编程备查 在Excel用“宏”中的Visual Basic编辑器编写程序比在单元格中编写公式要直观、明晰、方便得多。不需要很多的Visual Basic知识就可以编写出应用很方便的程序来。 Visual Basic编辑器具有VB 6.0 的大部分功能。一般用VB 6.0编写的程序拷贝到Excel来只需修改一下与界面的传递方式即可运行。它也可像VB 6.0一样，通过“引用”导入其它驱动程序与其它Excel工作簿及各种数据库、AutoCAD等其它语言连接。控件工具箱也很丰富。 ** VBA 对象、属性、方法和事件 * 对象、属性的格式 对象名.属性=表达式 例如：设置第2行单元格行高为9.6的语句是： Rows(“2:2”).RowHeight=9.6 * 方法的格式： 方法有选定（.Select）、复制、粘贴（.Paste）、保护、激活等。 对象名.方法 例：将B4单元格中的内容“我们”复制到单元格C3中 Range(B4).Select ActiveCell.FormmulaRICI=“我们” Range(C3).Select ActiveSheet.Paste * 事件 事件是用户或系统所执行的操作。如：单击鼠标、聚焦等。 ** 常用函数 * IF 执行真假值判断，根据逻辑计算的真假值，返回不同结果。 可以使用函数 IF 对数值和公式进行条件检测。 语法 IF(logical_test,value_if_true,value_if_false) Logical_test??? 表示计算结果为 TRUE 或 FALSE 的任意值或表达式。例如，A10=100 就是一个逻辑表达式，如果单元格 A10 中的值等于 100，表达式即为 TRUE，否则为 FALSE。本参数可使用任何比较运算符。 Value_if_true??? logical_test 为 TRUE 时返回的值。例如，如果本参数为文本字符串“预算内”而且 logical_test 参数值为 TRUE，则 IF 函数将显示文本“预算内”。如果 logical_test 为 TRUE 而 value_if_true 为空，则本参数返回 0（零）。如果要显示 TRUE，则请为本参数使用逻辑值 TRUE。Value_if_true 也可以是其他公式。 Value_if_false??? logical_test 为 FALSE 时返回的值。例如，如果本参数为文本字符串“超出预算”而且 logical_test 参数值为 FALSE，则 IF 函数将显示文本“超出预算”。如果 logical_test 为 FALSE 且忽略了 Value_if_false（即 value_if_true 后没有逗号），则会返回逻辑值 FALSE。如果 logical_test 为 FALSE 且 Value_if_false 为空（即 value_if_true 后有逗号，并紧跟着右括号），则本参数返回 0（零）。Value_if_false 也可以是其他公式。 说明 函数 IF 可以嵌套七层，用 value_if_false 及 value_if_true 参数可以构造复杂的检测条件。请参阅下面最后一个示例。 在计算参数 value_if_true 和 value_if_false 后，函数 IF 返回相应语句执行后的返回值。 如果函数 IF 的参数包含数组，则在执行 IF 语句时，数组中的每一个元素都将计算。 Microsoft Excel 还提供了其他一些函数，可依据条件来分析数据。例如，如果要计算单元格区域中某个文本字符串或数字出现的次数，则可使用 COUNTIF 工作表函数。如果要根据单元格区域中的某一文本字符串或数字求和，则可使用 SUMIF 工作表函数。请了解关于根据条件计算值。 示例 1 A 数据 50 公式 说明（结果） =IF(A2=100,Within budget,Over budget) 如果上面的数字小于等于 100，则公式将显示“Within budget”。否则，公式显示“Over budget”。(Within budget) =IF(A2=100,SUM(B5:B15),) 如果上面数字为 100，则计算单元格区域 B5:B15，否则返回空文本 () 示例 2 如果您将示例复制到空白工作表中，可能会更易于理解该示例。 A B 实际费用 预算费用 1500 900 500 900 500 925 公式 说明（结果） =IF(A2B2,Over Budget,OK) 判断第 1 行是否超出预算 (Over Budget) =IF(A3B3,Over Budget,OK) 判断第 2 行是否超出预算 (O