首页 Excel正文

韭零后还有救吗?Excel制作动态折线脉搏图。2021年1-3月上证指数历史数据

sanrenxing Excel 2021-03-16 1128 0 | 文章出自:https://mp.weixin.qq.com/s?__biz=MzI5OTAwNjMzMg==&mid=2694958412&idx=1&sn=e178a81a015d73b243d49e16896fb87e&chksm=c9c84d5ffebfc44967a04c67b4b2cfab816ab5ebcd1c55e383b3067e70c811549373da997cb0&token=599228088&lang=zh_CN#rd 动态折线脉搏图

韭零后还有救吗?Excel制作动态折线脉搏图。2021年1-3月上证指数历史数据

Excel制作动态折线脉搏图

韭零后还有救吗?

    大盘起起伏伏,基金潮起潮落,小编也决定追个热点,用Excel折线图作为基础,用上证指数反映韭零后的脉搏。看完以后,身为韭零后的我,感觉彻底晾凉。


制作指南-准备源数据

    红色区域上证指数数据是从中证指数有限公司官网获取。绿色区域的辅助数据是我们为这次制图特别提供的助攻数据。

图上没有的查询天数:I1=72,很多地方会用到它。

辅助脉搏线:=IF(ROW()-1<=$I$1,B2,NA()),如果当前行数,还没到最大天数,那么返回B列数据,否则返回#N/A。

辅助箭头:=IF(ROW()-1=$I$1,B2,NA()),如果当前行数达到最大天数,返回B列数据,否则返回#N/A。

上限:=MAX($B$2:$B$73)+100

下限:=MIN($B$2:$B$73)-100

多系列折线图

    选择A1:F73单元格区域,工具栏【插入】→【图表】→【二维折线图】,创建一个最标准的多系列折线图。

1、隐藏【收盘】系列图表。点击图表→【格式】→【格式】在下拉菜单中选择【系列 "收盘"】→【形状和轮廓】设为无轮廓、无填充,将它隐藏。

2、设置箭头格式。点击图表→【格式】→【格式】在下拉菜单中选择【辅助圆点】→【设置所先内容格式】→【填充】→【标记】→【数据标记选项】→点选【内置】类型为箭头大小为6,填充颜色设为红色无线条。

3、设置辅助脉搏线格式。点击图表→【格式】→【格式】在下拉菜单中选择【辅助脉搏线】→【形状和轮廓】设为1磅粗细。

4、删除不必要的图例,增加图表标题,设置图表背景填充。

宏代码设置自动播放

    开启耍帅模式,实现自动播放。其实实现起来挺简单的,总共就两步。

1、添加如下VBA代码:

Sub jiulinghoumaibotu()

ActiveSheet.EnableCalculation = True

Application.ScreenUpdating = True

For i = 1 To 72

[I1] = i  '根据单元格实际位置修改

DoEvents

DoEvents

    Application.Wait (Now + 0.00000575)  '数字越小,绘制速度越快

Next i

End Sub

2、创建播放按钮。工具栏【插入】→【形状】→【椭圆】,右键椭圆形,在弹出的快捷命令列表中选择“指定宏”,弹出指定宏窗口,选择上一步创建好的宏代码,点击【确定】按钮。至此,大功告成,点击椭圆按钮,就可以看韭零后的脉搏了。

版权声明

本文仅代表作者观点,不代表本站立场。
本文系作者授权发表,未经许可,不得转载。

评论