也冒充一下excel高手：编3个常用的excel函数

excel函数有四五百个，但有时还是无法满足工作中的需要。作为excel高手，不二选择是自已动手编写excel函数。可对于连excel操作都不熟悉的新手来说，编写函数对自已如天方夜潭一般。

嘿嘿！想不想也冒充一下excel高手！让你身边的同事也震惊一把。如果想就开始跟兰色一起做吧。

1、打开编写excel函数的窗口

在VBA编辑器里，简称VBE。在工作表标签右键上点击“查看代码”。

2、在窗口中创建编写代码的地方

点击 插入- 模块。在右上角小窗口可以看到插入后的模块1，双击模块1，右侧即会显示一个空白的区域，此区域即是编写函数和存放函数代码的地方。

3、开始编写代码

编写excel函数要以Function（中文意思：函数）开头，以End Function函数结尾，函数名放在Function的后面，在不违反起名规则的前提下，用任意字符作为名子。

---

Funcion 函数名(参数1,参数2...)

实现函数功能的代码

End Function

【例1】取得当前工作表数量的函数Getsh

代码为：

Funcion Getsh()

Application.Volatile True

Getsh = Sheets.Count

End Function

【例2】用指定连接符连接一个单元格区域字符的函数LianJie

代码为:

Function LianJie(Rg As Range, sr As String)

Dim R as String

Application.Volatile True

For Each s In Rg

R = R & sr & s

Next s

LianJie = Right(R, Len(R) - 1)

End Function

【例3】提取批注内容的函数 GetPizhu

代码

Function Getpizhu(Rg As Range)

Application.Volatile True

Getpizhu = Rg.Comment.Text

End Function

注：Application.Volatile True 的作用是当工作表更新后，自定义函数的结果也自动更新。

---

添加后的效果如下图所示：

4、保存代码。

在excel2007版以后，代码需要保存在xlam类型的文件中。文件 - 另存为 - 类型选取“Excel启用宏的工作簿(*.xlam)'

5 、使用自已编写的函数。

文件保存后，即可直接在工作表中使用该函数。

计算当前文件工作表的总数量

用','连接A1：A5区域的字符

提取A1单元格批注中的内容

书也买了一大堆，没心思看。教程也下载了好多，越看越迷糊。excel到底该怎么学？其实，通过视频学习才是最好的学习途径，点左下角'阅读原文' 查看兰色幻想 小妖录制的超全的290集excel视频教程。