Alt+F11，点击“插入”-“模块”
Function Test(str As String)
Test = "0" & str
End Function
以上就是一个简单的自定义函数。将传入的str前加0。在某个单元格输入 =Test(A1) 后，将显示0与A1合并的结果。