1 内置函数
1.1 文本函数
1.2 数学和三角函数
1.3 查找和引用函数
1.4 统计函数
1.5 日期和函数函数
1.6 信息函数
1.7 逻辑函数
1.8 工程函数
1.9 数据库函数
1.1 文本函数
1.2 数学和三角函数
1.3 查找和引用函数
用于查找或引用特定内容。
1.4 统计函数
1.5 日期和时间函数
1.6 信息函数
返回系统当前某些状态信息,如工作簿名称、单元格格式等。
1.7 逻辑函数
用于对数据进行相应的逻辑判断。
1.8 工程函数
2 自定义函数
定义一个字符串连接函数:
使用效果:
附代码:
Function Contxt(ParamArray args() As Variant) As Variant Dim tmptext As Variant Dim i As Variant Dim cellv As Variant tmptext = "" For i = 0 To UBound(args) If Not IsMissing(args(i)) Then Select Case TypeName(args(i)) Case "Range" For Each cell In args(i) tmptext = tmptext & cell Next cell Case "Variant()" For Each cellv In Application.Transpose(args(i)) tmptext = tmptext & cellv Next cellv Case Else tmptext = tmptext & args(i) End Select End If Next i Contxt = tmptextEnd Function
-End-