分类：电脑/网络-软件-办公软件
问题：VBA中怎么调用自定义函数一个简单自定义函数按我的设想，运行宏1 
一个简单 自定义按我的设想，运行宏1时 能弹出对话框 “120”可是实际运行时一直是“0”想请教下高手是什么原因，还有如果我把自定义函数放到类模块中得时候，我该怎么调用这个函数了？我是为了学习，我知道单单是这一个向上求整的函数可以直接用宏计算，是想知道怎么调用函数。谢谢。Sub 宏1()Dim s As Integerz = fde(112, 10)MsgBox zEnd SubFunction fde(x As Integer, y As Integer) As IntegerIf y &l一个简单 自定义按我的设想，运行宏1时 能弹出对话框 “120”可是实际运行时一直是“0”想请教下高手是什么原因，还有如果我把自定义函数放到类模块中得时候，我该怎么调用这个函数了？我是为了学习，我知道单单是这一个向上求整的函数可以直接用宏计算，是想知道怎么调用函数。谢谢。Sub 宏1()Dim s As Integerz = fde(112, 10)MsgBox zEnd SubFunction fde(x As Integer, y As Integer) As IntegerIf y <> 0 Then If Int(x / y) * y = x Then  z = x  Else  z = Int(x / y) * y + y  End IfElsez = "y不能为零"  End IfEnd Function
回答：可作如下修改：

1.代码

（1）将宏代码中的两个字母“z”改为“s”。

（2）在自定义的fde函数倒数第二行添上“ fde = z ”。

2.调用

自定义的fde函数应放在插入的模块中（不是类模块）！