请问自定义的Fucntion函数怎样才能只被VBA引用？

赵国辉 · 发表于 2009-12-20 23:25

原帖由 taller 于 2006-2-23 10:59 发表
可以变通一下，函数属性仍然为Public，但是代码放在工作表对象中，这样在工作表中插入时就看不到这个函数，但是其它模块仍然可以调用'---------------------------------------------------------Sheet1------------ ...

看到了类及其方法，O(∩_∩)O~

yuyangqh · 发表于 2010-4-16 00:00

taller老师真厉害呀，学习了，自定义函数可以这么用

zhang632 · 发表于 2010-9-24 22:48

这个方法不错

wxhnr · 发表于 2010-9-25 05:23

Function aaa() As String
If TypeName(Application.Caller) = "Range" Then
aaa = "不能在工作表使用！"
Exit Function
End If
aaa = "hello"
End Function

逍飞 · 发表于 2011-11-7 22:02

正在学习中。

qznazz · 发表于 2012-7-11 07:09

只要在前面加“private”，自定义函数的名称就不会出现在“插入/函数”对话框中。
private function N()
……
end function

news30 · 发表于 2012-12-19 01:17

很实用，不错

QIZIFEI20090829 · 发表于 2014-8-26 10:09

好东西，学习了，谢谢斑竹！

jial1047 · 发表于 2015-7-27 19:51

学习了，谢谢

micch · 发表于 2021-8-9 00:09

版主的方法最简单，不过建议还是用类模块实现这个函数的功能，这样使用起来也方便

		自动登录	找回密码
密码			免费注册