excel下vba编程

自定义函数

          最近需要在excel中实现一个功能，查阅excel的函数没有，或者是我没找到，于是使用 VBA进行扩展实现，步骤如下：

         1）  打开要扩展的excel文件,并启用宏。 2007的excel文件，在表格上面一行有一个黄色小条提示

         2）  使用快捷键 Alt+F11 打开vba编辑窗口

         3）  在左边的部分新增模块（这步应该可以省略）

         4） 在新模块文件中使用  Function 创建相应函数

         5） excel中最常用的对象就是Range，该对象代表 一个、多个单元格； 二维表格和三维表格。 需要对二维Range进行遍历是方法如下：

                                 Dim ra as Range   //其实这个应该通过参数传入

                                 for i =1 to ra.Rows.Count

                                          for j=1 to ra.Columns.Count

                                                    ra.Cells(i,j)  //得到二维表格中的每一个 单元格

         6） 返回值为 ： 函数名=count；

         7） 保存完成后，可以设置断点

         7） 在excel中调用方式类似于普通函数