王佩丰Excel24讲_第22讲:制作甘特图与动态甘特图
发布日期:2024-07-22 02:01 点击次数:149
一、制作甘特图
1.制作普通甘特图
2.制作动态甘特图
系列文章目录
一、制作甘特图1.制作普通甘特图目标图表如下:图片
具体步骤如下:选中数据,点击“插入-条形图-堆积条形图”
图片
选中图表区域,点击“图表工具-更改颜色-选择紫色”
图片
图片
对比原图,不难发现,实际上只有浅紫色的部分是我们需要的;所以选中图表区域中深紫色的条形图,右键设置“数据系列格式”,将填充改为“无填充”,线条改为“无线条”,阴影改为“无阴影”
图片
图片
图片
图片
根据原图可知,甘特图要实现左右顶格,这需要修改刻度“最大值、最小值”;由原数据可知,最小日期是2014/5/1,最大日期是2014/5/31,因为刻度“最大值、最小值”对应的是数字,因此把日期转换成数字分别是41760、41790
图片
选中横坐标轴,右键设置“坐标轴格式”,将坐标轴边界最小值设置为41760,最大值设置为41790
图片
图片
根据原图,去掉年份,只留下月/日,右键设置“坐标轴格式”,将数字改为m/d;@格式
图片
去掉图例,缩小条形图之间的间距,选中条形图,右键设置“数据系列格式”,将“分类间距”改为10%
图片
图片
根据原图,第一个任务在最上面,最后一个任务在最下面,如何把图表上下颠倒过来?选中纵坐标轴,右键设置“坐标轴格式”,选择“逆序类别”
图片
图片
将除纵坐标外的竖线改为虚线,选中后右键设置“网格线格式” ,将“短划线类型”改为虚线
图片
图片
最后加上标题
图片
2.制作动态甘特图目标图表如下:图片
图片
即通过当前日期的变化,任务完成情况跟着变化具体步骤如下:(1)“插入-窗体-滚动条”,设置“滚动条”的控件格式,最小值应该为41760,最小值为41790,
图片
图片
图片
(2)但是发现控件设置不能超过3000,因此可以输入0-30(因为最大最小值相差30),单元格链接为C11,此时需要修改当前日期为:today()+$C$11
图片
图片
为了可以更为明显的看出“已完成天数”和“未完成天数”,这里将数据日期改为2023年8月,那么横坐标的最大最小值需要改为45139和45169,如下图:图片
(1)隐藏“计划开始日”
图片
(2) 调整条形图左右顶格,即更改坐标轴边界最小值为 41760,最大值为41790
图片
图片
(3)设置横坐标轴日期格式为“月/日”
图片
(4)调整条形图之间的间距 ,分类间距为10%
图片
图片
(5)调整任务顺序,第一个任务放在第一位,最后一个任务放在最后一位,即将纵坐标轴位置改为“逆序类别”
图片
图片
添加标题,去掉图例,调整网格线,调整颜色等
图片
如果当前日期<任务开始日期,那么已完成天数为0;
如果当前日期>任务开始日期+天数=任务结果日期,那么已完成天数为“天数”;
如果当前日期>=任务开始日期 且 当前日期<=任务结果日期,那么已完成天数为“当前日期-任务开始日期”;
图片
未完成天数=天数-已完成天数
图片
首先,根据原图可知,原数据包括三部分,全部日期(透明色)、已完成天数(蓝色)、未完成天数(红色),因此需要将天数根据“当前日期”进一步划分为“已完成天数”和“未完成天数”
具体思路如下:
接着选中“任务列、计划开始日、已完成、未完成”4列数据,“插入-条形图-堆积条形图”,如下图可知:蓝色代表“计划开始日”-需要隐藏、红色代表“已完成天数”、绿色代表“未完成天数”
图片
然后开始调整图表区域格式:
最后添加滚动条控件:
最后添加当前日期控件:
(1)插入“文本框”,本来可以直接在编辑栏引用单元格B11,但是因为WPS兼容形状或者文本框引用单元格没有常规设置的入口,只能通过VBA来设置,代码如下:
图片
图片
图片
(2)点击“关闭并返回WPS表格”,并将指定宏的文本框移出图表区域,重新插入一个文本框
图片
图片
(3)然后选中新插入的文本框并点击“指定宏的文本框”,发现新文本框中会显示“当前日期”;拖动滚动条,当前日期也会随之变化
图片
图片
(4)再插入一个文本框,写上“当前日期”四个字,并去掉边框
图片
至此,目标图表已完成
图片
VBA代码如下: Sub kkkk() Selection.Formula = "=$H$4" End Sub本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。
相关资讯