VBA肯定能调用工作表函数,调用方法也是很简单,只需在函数名称前面加上:
Application.WorksheetFunction.函数名(参数)。其参数的使用规则与在工作表中使用要求完全一致。除了能调用工作表函数,VBA自身内置也有很多函数可以使用。因为是VBA自身内置的函数,所以在使用时,在前面可以加上:VBA.函数名,也或者直接调用写函数名。经常有人可能用不同版本的办公程序打开有代码的工作簿,结果就有可能会出现如“找不到工程或库”的提示。怎么办呢?如果是因为VBA自身内置函数的原因,则可以在前加上“VBA.”就行了。当然,也可在 VBE界面中菜单【工具】->【引用】打开引用对话框,查找带勾项中含“丢失…”、“找不到…”、“MISSING…”的条目,并取消勾选,确定,基本就可以了。现在总结下常用的VBA自身内置函数如下(中间文字过长,或以跳转到最下面看看“其他常用函数”,很有用的哦。):
测试类函数:
IsNumeric(x) - 是否为数字, 返回Boolean结果。
IsDate(x) - 是否是日期, 返回Boolean结果。
IsEmpty(x) - 是否为Empty, 返回Boolean结果。
IsArray(x) - 指出变量是否为一个数组。
IsError(expression)- 指出表达式是否为一个错误值。
IsNull(expression)- 指出表达式是否不包含任何有效数据 (Null)。
IsObject(identifier)- 指出标识符是否表示对象变量。
数学函数:
Sin(X)、Cos(X)、Tan(X)、Atan(x) - 三角函数,单位为弧度。
Log(x)、Exp(x) - 返回x的自然对数,指数。
Abs(x) - 返回x的绝对值。
Int(number)、Fix(number) - 都返回参数的整数部分,区别:Int 将 -8.4 转换成 -9,而 Fix 将-8.4 转换成 -8。
Sgn(number) - 返回一个 Variant (Integer),指出参数的正负号。
Sqr(number) - 返回一个 Double,指定参数的平方根。VarType(varname) -返回一个 Integer,指出变量的子类型。
Rnd(x) - 返回0-1之间的单精度数据,x为随机种子。
Round(x,y)- 把x四舍五入得到保留y位小数的值。
字符串函数:
Trim(string)、Ltrim(string)、Rtrim(string) - 去掉string左右两端空白,左边的空白,右边的空白。
Len(string) - 计算string长度
Replace(expression,find,replace)- 替换字符串。
Left(string, x)、Right(string, x)、Mid(string, start,x)- 取string左/右/指定段x个字符组成的字符串Ucase(string)、
Lcase(string) - 转换字符串为大、小写Space(x) - 返回x个空白的字符串
Asc(string) - 返回一个 integer,代表字符串中首字母的字符代码
Chr(charcode) - 返回 string,其中包含有与指定的字符代码相关的字符
InStr() - 返回一个字符串在另外一个字符串中的位置,返回值为Variant(Long)型。
转换函数:
CBool(expression)- 转换为Boolean型
CByte(expression)- 转换为Byte型
CCur(expression) -转换为Currency型
CDate(expression)- 转换为Date型
CDbl(expression) -转换为Double型
CDec(expression)- 转换为Decemal型
CInt(expression) -转换为Integer型
CLng(expression) -转换为Long型
CSng(expression) -转换为Single型
CStr(expression) -转换为String型
CVar(expression) - 转换为Variant型
Val(string) - 转换为数据型
Str(number) - 转换为String
时间函数:
Now、Date、Time - 返回一个 Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。
Timer - 返回一个 Single,代表从午夜开始到现在经过的秒数。
TimeSerial(hour,minute, second) - 返回一个 Variant (Date),包含具有具体时、分、秒的时间。
DateDiff(interval,date1, date2[, firstdayofweek[, firstweekofyear]]) - 返回 Variant (Long) 的值,表示两个指定日期间的时间间隔数目。
Second(time) - 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一分钟之中的某个秒。
Minute(time) - 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一小时中的某分钟。
Hour(time) - 返回一个 Variant (Integer),其值为 0 到 23 之间的整数,表示一天之中的某一钟点。
Day(date) - 返回一个 Variant (Integer),其值为 1 到 31 之间的整数,表示一个月中的某一日
Month(date) - 返回一个 Variant (Integer),其值为 1 到 12 之间的整数,表示一年中的某月。
Year(date) - 返回 Variant (Integer),包含表示年份的整数。
Weekday(date,[firstdayofweek]) - 返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。
其它常用函数:
Shell - 运行一个可执行的程序。
InputBox - 这个太熟悉了,简单输入对话框。这个需要注意与Application.InputBox(更强大,内置容错处理,选择取消后返回false)区分,而这个函数不含有容错处理,而且选择取消后返回空串(零个字节的字符串)。
MsgBox - 这个更不用说了,简单信息显示对话框,其实也是一种简单的输入手段。
Join - 连接数组成字符串。
Split - 拆分字符串成数组。
RGB - 返回指定R、G、B分量的颜色数值。
Dir - 查找文件或者文件夹。
IIF(expression,truePart, falsePart) - IF语句的“简化版本”(比喻,当然并不一样);expression为true的话返回truePart,否则返回falseParth。Choose(index,choice1,...choiceN) - 选择指定Index的表达式,Index可选范围是1到选项的总数。
Switch(exp1,value1,exp2,value2,...expN,valueN)- 从左至右计算每个exp的值,返回首先为true的表达式对应的value部分。如果所有的exp值都不为true,则返回Null。注意虽然只返回一个部分,但是这里所有的表达式exp1到expN都是要被计算的,实际使用中要注意这个副作用。