28、如何定义自己的函数?
用户在Excel中可以自定义函数。切换至 Visual Basic模块,或插入一页新的模块表(Module),在出现的空白程序窗口中键入自定义函数VBA程序,按Enter确认后完成编 写工作,Excel将自动检查其正确性。此后,在同一工作薄内,你就可以与使用Exed内部函数一样在工作表中使用自定义函数,如:
Function Zm(a)
If a< 60 Then im='不及格”
Else Zm=“及格”
End If
End Function
28、函数同过程一样,不仅仅能保存在当前工作簿里,它也可以像内置函数样直接保存在所有的工作簿中。因此,你的第29例便显得很累赘,而且不安全,因为那个保存自定义公式的工作簿有可能被删或者被转移,那么你得在所有引用了该公式的工作簿中一一修改引用的函数!!顺便更正:你例子中的“If a< 60 Then im='不及格””的im应该是函数名zm,还有就是单双引号的问题。