vba编程问题求助 急!!!!!!!!!!!!

茂茂 2024-06-17 21:54:55
最佳回答
a列为数据,b列为升势天数及趋势位置,c列为跌势天数及趋势位置宏程序如下,参考一下sub lxx()dim h, l, u, d, m 'h,l,分别为一个趋势周期内的最高值和最低值,u,d为升势、跌势的标志位,m用于统计趋势天数h = [a1].valuel = [a1].value '以第一天为基准初始化最高及最低值for i = 1 to 246 '计数246个数据m = m + 1 '累计天数if cells(i, 1).value > h then h = cells(i, 1).value '每天数据比最高值大,则此天值作为最高值if cells(i, 1).value < l then l = cells(i, 1).value '每天数据比最低值小,则此天值作为最低值if cells(i, 1).value / l >= 1.08 then u = 1 '与最低值比,升辐超过8%,升势标志置1if cells(i, 1).value / h < 0.97 and u = 1 then '处于升势情况下,比最高值低3%,则进行如下复位处理u = 0 '升势标志置0,结束一个周期cells(i, 2).value = m '升势天数写入b列相应行位置m = 0 '天数归零,以便下一周期重新累计天数h = cells(i, 1).valuel = cells(i, 1).value '以趋势结束天的数据作为下一次趋势统计基准end if'下面为跌势分析,与升势分析雷同if cells(i, 1).value / h < 0.92 then d = 1if cells(i, 1).value / l > 1.03 and d = 1 thend = 0cells(i, 3).value = mm = 0h = cells(i, 1).valuel = cells(i, 1).valueend if'下面是处理最后一个数据时的趋势if i = 246 and u = 1 then cells(246, 2).value = mif i = 246 and d = 1 then cells(246, 3).value = mnextend sub 20210311
汇率兑换计算器

类似问答
  • 期货指标编程求助
    • 2024-06-17 07:32:30
    • 提问者: 未知
    这个,很简单,但是我不会,你去华文财经的编程论坛,绝对有人指点你
  • wlk商业技能问题!急求帮助
    • 2024-06-17 11:43:41
    • 提问者: 未知
    拔草 炼金你丢他做啥?珠宝就初期赚一点 后期做暗月卡都需要草药 草药的需求量是最大的 超过矿 炼金的合计大蓝 大红 简直就是** 刚刚上去ah一看 一瓶法力蚀刻药剂 15g 公会开荒 有钱的就吃合计...
  • 紧急求助关于贷款的问题,谢谢啊
    • 2024-06-17 14:08:32
    • 提问者: 未知
    贷款条件:1、固定收入,要看工资明细2、年满18-65周岁;3、如**款用于经营或购车,要有担保人和抵押;4、征信良好。贷款申请资料:1、贷款人**;2、贷款人近半年征信信息,且征信信息良好;3、贷款人名下近半年的**流水,无中断;4、贷款人居住证证明(租房合同、房产证、近三个月水、电、费煤气**);5、贷款人工作单位开具的证明;6、社保、保单、公积金月供也可贷款。如果想贷更高的额度,可以做抵押贷...
  • 急求!防水问题?
    • 2024-06-17 05:19:24
    • 提问者: 未知
    卫生间的防水层按装修规范,应当除地面外,墙面还要做1.8米高。只要这样做好防水层,贴瓷砖时就不需再刷防水涂料了。当然,这是指在整个卫生间的闭水试验没有渗漏问题之后...
  • 请编写如下要求vba代码?
    • 2024-06-17 07:49:36
    • 提问者: 未知
    sub s() arr=application.inputbox("输入范围:",8) n=ubound(arr) k=ubound(arr,2) set rg=application.inputbox("输入间隔:",8) for each c in rg for i=1 to k c.offset(0,i)=arr(n-c,i) next next end sub
  • 什么是vba?如何编写和运行vba代码?
    • 2024-06-17 17:55:28
    • 提问者: 未知
    1进入vbe窗口常用方式有以下几种。第1种方式是快捷键<alt+f11>。 第2种方式是右键单击任意工作表标签,在弹出的快捷菜单中选中【查看代码】命令。2第3种方式是在【开发工具】选项卡中进行操作。 ……我们知道excel有功能区,功能区内有选项卡,每个选项卡对应不同的功能分类。比如【开始】选项卡集中了用户最常使用的功能;【插入】选项卡集中了透视表、图形和图表等功能;【页面布局】是打印...
  • 使用excel的vba函数进行入门级编程
    • 2024-06-17 05:32:08
    • 提问者: 未知
    1新建一张空白的excel表格。表格格式为xls、xlsx都可以。2要使用vba必须要通过vba工具栏进行操作,因此需要将vba工具栏调出。此操作需要在excel的选项中进行设置勾选。勾选之后点击确定返回主界面可以看到工具栏出现“开发工具”字样,说明vba工具栏已经调取成功。3此处以加法作为示例。先构建一个大体的加法架构。4点击“开发工具”下的“v**ual basic”按钮,在弹出的界面中双击s...
  • 有早产风险问题的求助,急急急
    • 2024-06-17 16:27:54
    • 提问者: 未知
    这个情况我还是第一次听说呢,既然自己出现这样的情况,那么你还是根据医生的要求自己注意一下吧,坚持一下啊,三十七周胎儿就足月了,加油
  • 求助!!急!!excle图表粘贴问题
    • 2024-06-17 09:49:23
    • 提问者: 未知
    说明你插入的不是图片。而是真正的excel图表,你只能粘贴,你如果点这个图表的数据源就可发现,这是链接到你的原始数据表上的。最好的办法是用qq的切图,将图表趋势图转换成图片,再插入excel
  • 求助 **问题!急切!!!
    • 2024-06-17 18:22:36
    • 提问者: 未知
    1、每个行**收费情况不一样,而且普通**白金**收费情况也不一样,具体收年费的标准还要咨询一下各个行**客服。**即使没有用、而且卡里也没有钱,也是会扣年费的,因为**可以透支。2、如果就是取款用就办一张轻松理财普卡就可以了,浦发的同城同行存取款都没有手续费,跨行跨省市都是千分之五手续费。麦兜卡属于**,不管在哪里办都要交到总行**中心审核,但是上海要比别的省份快,因为总行在上海,刷卡没有利息,...
汇率兑换计算器

热门推荐
热门问答
最新问答
推荐问答
新手帮助
常见问题
房贷计算器-九子财经 | 备案号: 桂ICP备19010581号-1 商务联系 企鹅:2790-680461

特别声明:本网为公益网站,人人都可发布,所有内容为会员自行上传发布",本站不承担任何法律责任,如内容有该作者著作权或违规内容,请联系我们清空删除。