欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 编一个自定义函数,测试通不过。

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有4296人关注过本帖树形打印复制链接

主题:编一个自定义函数,测试通不过。

帅哥哟,离线,有人找我吗?
txin66
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:464 积分:932 威望:0 精华:0 注册:2011/8/22 15:37:13
编一个自定义函数,测试通不过。  发帖心情 Post By:2011/9/7 23:41:38 [只看该作者]

按 SHIFT F5 ,报 “编译器错误 1012  ,缺少if  ”;

该函数的目的,是函数中已经对3个 数(实际是30多个数)的大小关系设定好,调用函数时输入数值,函数将其与函数里面预先的大小关系进行类比,类比符合的,返回一个数值;

如果下面的代码不适合,请问用什么语句来表达更好。

如果在公式编辑窗口里,如何实现。

这个类似的问题,已经提了好几次。麻烦哪位高手一次彻底指点。

 

 

Function ABC(Formula,x,y,z)


    ABC=0

    If x>y and y>z     Then
         abc=1
   
    Else If x>y and y<z then
  abc=2
   
    Else If x<y and y<z then
       abc=3
  
   
   
    End If


End Function


 回到顶部
帅哥哟,离线,有人找我吗?
admin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2011/9/8 14:59:19 [只看该作者]

ElseIf 中间不要加空格 

 回到顶部
帅哥哟,离线,有人找我吗?
zjxte
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:4 积分:87 威望:0 精华:0 注册:2010/4/2 2:13:27
  发帖心情 Post By:2011/9/19 23:56:38 [只看该作者]

只能说是vba不熟悉造成的

 回到顶部