带你入门VBA，第三讲（编写简单的自定义函数）

兰色幻想 · 发表于 2004-10-15 08:38

以下是引用glober609在2004-10-15 8:29:00的发言：

太好了，我一直很想学习vba，但是就是不知道如何运用它，现在好了，我的第一个函数编好了，但是我有个疑问，我编的函数是不是只能运用于该函数所在的工作簿，我想在任何一个工作簿中运用我编写的所有函数，应该如何去做？？？？

望回复！

偏爱你的vba,爱死你了！！！！！！！！！！！！！！！！！！

办公之星 · 发表于 2004-10-16 18:52

Function Panduan(aa As Range) If aa.Value > 0 Then Panduan = "大于零" ElseIf aa.Value = 0 Then Panduan = "等于零" Else Panduan = "小于零" End If

End Function

上述程序直接放入模块，并不能运行。

似乎提示它是一个事件，事件需要放在模块中吗？

yigepure · 发表于 2004-10-16 19:04

它仅是一个自定义的函数.定义完了以后

可以使用呀.如

A B

1 10 =panduan(a1)回车单元格内返回的就是"大于零"

办公之星 · 发表于 2004-10-16 19:25

以下是引用chenjun在2004-10-8 22:30:00的发言：

Application.WorkSheetFunction是在VBA中使用工作表函数定义用的，你可以直接用Application.就可以了。

chenjun老师参与，课程的权威性和趣味性明显提高了，谢谢。

上面这句话的意思是WorkSheetFunction只有在建立自定义函数时候使用，还是“使用工作表函数定义”有其它含意？

办公之星 · 发表于 2004-10-16 19:39

86楼的问题已经搞明白了，是自己把编码放到了sheet1中了。

不过我还是不明白，它为什么在sheet1中不可以运行？

兰色幻想 · 发表于 2004-10-16 20:43

TO 办公之星

[此贴子已经被作者于2004-10-16 20:43:32编辑过]

办公之星 · 发表于 2004-10-16 21:04

感谢楼主，今天总算把第三讲看完了，其中第二个示例太复杂，看不懂。

有没有这样的打算，讲讲语法、命令、属性等等的？根本没有基本词汇，VBA帮助又不像程序帮助好懂。

兰色幻想 · 发表于 2004-10-16 21:23

以下是引用办公之星在2004-10-16 21:04:00的发言：

感谢楼主，今天总算把第三讲看完了，其中第二个示例太复杂，看不懂。

有没有这样的打算，讲讲语法、命令、属性等等的？根本没有基本词汇，VBA帮助又不像程序帮助好懂。

有这个打算，属性一节，方法一节，事件一节，基本语句一节等等

办公之星 · 发表于 2004-10-16 21:37

以下是引用兰色幻想在2004-10-16 21:23:00的发言： 有这个打算，属性一节，方法一节，事件一节，基本语句一节等等

太棒了，应当先打打基础，学上几个词汇再来。

直接上编程，等于让我们直接和美国鬼子讲日语，累！

tingming · 发表于 2004-10-16 22:04

强烈要求兰大侠讲讲属性、方法之类的。谢谢大侠！！！

[em06]

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

紧急求救！！！