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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 求pel翻译成vba

   

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


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

主题:求pel翻译成vba

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


加好友 发短信
等级:新手上路 帖子:61 积分:265 威望:0 精华:0 注册:2012/11/4 12:56:09
求pel翻译成vba  发帖心情 Post By:2013/3/19 9:49:31 [只看该作者]


参数n的默认值1200,取值范围100到3000


付主买成交量4:=IF(C<REF(BIDPRICE,1) AND ASKPRICE=REF(ASKPRICE,1) AND ASKVOL<REF(ASKVOL,1) AND V>REF(BIDVOL,1),MIN(REF(ASKVOL,1)-ASKVOL,V-REF(BIDVOL,1)),
               IF(C<REF(BIDPRICE,1) AND ASKPRICE>REF(ASKPRICE,1),V*(ASKPRICE-REF(ASKPRICE,1))/(ASKPRICE-REF(ASKPRICE,1)+REF(BIDPRICE,1)-C+MINDIFF),0));


主卖总计:=SUM(主卖量,0);

净量:主买总计-主卖总计,COLORWHITE,LINETHICK2;
  红:IF(净量>REF(净量,1),净量,DRAWNULL),COLORRED,LINEDOT;
  绿:IF(净量<REF(净量,1),净量,DRAWNULL),COLORGREEN,LINEDOT;
  0,POINTDOT;
 净量回归线:FORCAST(净量,N);
 净量回归线红:IF(净量回归线>REF(净量回归线,1),净量回归线,DRAWNULL),COLORRED,LINETHICK2;
 净量回归线绿:IF(净量回归线<REF(净量回归线,1),净量回归线,DRAWNULL),COLORGREEN,LINETHICK2;

 


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


加好友 发短信 czt
等级:蜘蛛侠 帖子:1445 积分:6114 威望:0 精华:3 注册:2012/1/16 10:31:19
  发帖心情 Post By:2013/3/19 10:02:34 [只看该作者]

你这个问题,是vba的比较基础的东西,给变量赋值 首先用dim 去定义一下 然后变量计算完之后用set赋值。if语句语法格式不同,其他都一样的

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


加好友 发短信
等级:新手上路 帖子:61 积分:265 威望:0 精华:0 注册:2012/11/4 12:56:09
  发帖心情 Post By:2013/3/19 10:11:35 [只看该作者]

希望每种举个例子,谢谢!


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


加好友 发短信 czt
等级:蜘蛛侠 帖子:1445 积分:6114 威望:0 精华:3 注册:2012/1/16 10:31:19
  发帖心情 Post By:2013/3/19 10:38:24 [只看该作者]


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


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2013/3/19 11:09:24 [只看该作者]

PEL翻译VBA的工程代码量巨大,客服无法为你免费编写。

建议客户书店买本VBA的书自学,遇到实际的VBA问题时论坛求助。

或者你可以考虑付费,由该板块版主为你有偿服务



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部