过程和函数,都可以是被相互调用的。
过程的调用
格式1:
Call 过程名
格式2:
Call 过程名(参数1, 参数2, ...)
Sub name(range_name)
Range(range_name).Select
'单一单元格的写入
'ActiveCell.FormulaR1C1 = "价格处理2"
'区域单元格的写入
Selection.FormulaR1C1 = "价格处理"
End Sub
Sub text()
Call name("A1:B2")
End Sub
函数的调用
函数的调用通常会在调用时把其赋值给一个变量,以获取函数返回值。
Sub test()
Dim s As Integer
s = my_sum(5, 5)
Debug.Print s
End Sub
Function my_sum(n1 As Integer, n2 As Integer) As Integer
Dim s As Integer
s = n1 + n2
my_sum = s
End Function
这里应该提出的是,函数应当要有返回值的,并且强烈建议,给返回值做一个声明一个类型,而不是变体类型,另外如果不需要返回值,那就应该直接使用过程而不是函数了。