Excel制作空气指数仪表盘

上传人:lx****y 文档编号:138410848 上传时间:2022-08-20 格式:DOC 页数:18 大小:1.14MB
返回 下载 相关 举报
Excel制作空气指数仪表盘_第1页
第1页 / 共18页
Excel制作空气指数仪表盘_第2页
第2页 / 共18页
Excel制作空气指数仪表盘_第3页
第3页 / 共18页
点击查看更多>>
资源描述
Excel制作空气指数仪表盘方法18 / 18仪表盘刻度制作方法参考网络上他人文章,在此表示感谢!仪表盘制作分为五个步骤,分别是规划仪表盘刻度、制作仪表盘、制作指针、让指针动气来、完善仪表盘功能。 下表是空气污染指数范围表(互联网拷贝,数据准确性有待考证),根据下表数据利用EXCEL2010制作一个仪表盘显示空气指数表。空气污染指数AI空气质量状况对健康的影响建议采取的措施-5优可正常活动。1100良101150轻微污染易感人群症状有轻度加剧,健康人群出现刺激症状。心脏病和呼吸系统疾病患者应减少体力消耗和户外活动.1500轻度污染20125中度污染心脏病和肺病患者症状显著加剧,运动耐受力降低,健康人群中普遍出现症状。老年人和心脏病、肺病患者应当停留在室内,并减少体力活动.25130中度重污染0重污染健康人运动耐受力降低,有明显强烈症状,提前出现某些疾病。老年人和病人应当留在室内,避免体力消耗,一般人群应避免户外活动制作步骤:1、 规划仪表盘刻度在Excel输入下表所示数据:刻度:仪表上显示的刻度值表盘:表盘的数据是插入环形图使用的,表盘度数的和是360度,每度位一个刻度,最后一个刻度单位是90度,度是占位符,用于标注刻度。2、 制作仪表盘选中:21数据插入圆环图(为了美观删除了图例),调整圆环图的大小达到满意的效果,如作品完成再调整大小会很麻烦!选中圆环图右键“设置数据系列格式”,在“设置数据系列格式窗口中修改第一扇区起始角度为225,修改后环线图形为0的区域转到正下方;圆环图内径大小可根据需要调整,这里设置为7%.选中圆环图右键“选择数据”选“添加,在编辑数据系列窗口中系列名称处输入“刻度,系列值选中数据表中的表盘数据B2:B21。“确定”按钮后进入选择数据源窗口,按“上移”按钮将“刻度”图例项上移。选“编辑”按钮,在轴标签区域输入刻度列数据,注意,数据个数要与表盘个数一致.按“确定”按钮,选内环图形,右键“添加数据标签”再选内环图形,右键“设置数据标签格式,在“设置数据标签格式”窗口中设置标签选项,在标签包括选项处只选“类别名称”,这样刻度就会显示在仪表盘上.右键选择内环,设置形状填充设为无填充颜色,形状轮廓设为无轮廓,表盘刻度就绘制好了.设置外环的图形颜色,根据空气质量指数范围设置颜色。-100绿色11-200黄色0130 橙色 红色选择外环相应的区域设置“形状填充”和“形状轮廓,外环数据为90的区域设置为“无填充颜色”。以050区域为例,鼠标选中该区域(小伙伴们要注意,不是整个图形呦),如下图,然后设置“形状填充”和“形状轮廓”为“绿色”。按上述方法设置其它区域颜色,所有区域颜色设置好后,仪表盘就制作成功了。小伙伴们看到下图有没有成就感?3、 制作指针“插入”“形状”中选择喜欢的图形来做指针,作者比较喜欢三角形,就选择插入三角形,调整三角形的形状使其像指针,“格式”“形状样式设置外观。指针转动是用vba实现。该方法中图形的转动是围绕图形的中心点转动,为了解决这个问题可以在复制一个指针,将两个指针组合成一个图形.美化指针:选择组合图形的下三角型,将其形状填充设为无填充颜色,形状轮廓设为无轮廓。插入一个圆形,调整大小,设置形状样式,放到指针中心位置,并与指针图形组合。将做好的指针移动到仪表盘中心位置上,细致调整到位,否则指针转动后位置会偏移影响效果.选中指针,在页面布局菜单下选“旋转”“其它旋转选项”。在“设置形状格式”窗口修改“旋转”度数为25.指针制作完成,效果如下:4、 让指针动起来在表格中输入空气指数、质量状况、指针位置三个数值。在表格中输入空气质量表空气指数:手工输入的空气污染指数。指针位置:表盘的刻度是0450之间,而仪表盘转动的角度是0-27度之间,空气污染指数与仪表盘刻度之间存在比例关系,1个单位的空气污染指数对应20/450单位仪表盘刻度,用公式表示就是1污染指数=0.6仪表盘刻度.单元格输入公式“=E0.6”。质量状况:根据空气污染指数值得到的空气质量状况用Vloo函数获得,G2单元输入公式“=VLOOKP(E2,J2:K,).开发工具选项下的“sul Base”进入va编辑器,如果没有开发工具菜单可参考下面的地址添加:旋转代码用录制宏生成的,选择“录制宏开始录制宏之后选中仪表盘中指针右键“大小和属性”修改“旋转”角度,角度值可以任意输入(不要大于360度)。停止录制宏,点击“宏按钮进入宏编辑找到刚才录制的宏进行“编辑”,拷贝宏代码,关闭宏。启动ba编辑器在vba编辑器中“通用”处选“Wrset”,“声明”处选“lectionhange。在上图代码粘贴宏代码,并做如下修改:代码的含义: Target.Addss ”E$2Then 判断变化的单元格是不是 ctveShetShap.Rag(Arra(Group )Slect选择指针SelectionSapeRnge。Rtion Range(E3) 35旋转指针 13是指针起始位置修正参数 Rang(E)。Selt选中E2单元格En If指针移到代码编写完成,在E处输入空气指数指针就会转动到相应刻度位置。5、 完善仪表盘功能()防止输入错误,空气污染指数是大于0的整数选择E单元,设置数据有效性。如下图:(2)空气污染指数爆表处理,当空气污染指数大于450时仪表盘将无法显示,这时将指针指向最大值50。修改指针位置单元的公式为“=IF(E2=45,70,E206)”()在仪表盘上显示空气污染指数和质量状况在仪表盘下面位置插入两个文本框,较小的文本框显示空气污染指数,对应值是E.大文本框显示空气质量状况,对应值是G2。设置文本框内文字居中,形状轮廓为无轮廓。至此仪表盘就制作完成了,整体效果如下:小伙伴们,仪表盘制作完成了,不知道你们的感觉如何?我是有些许成就感,为治理雾霾也算是出一份力。仪表盘可能还有不完美之处,希望小伙伴们完善哟!
展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 图纸专区 > 大学资料


copyright@ 2023-2025  zhuangpeitu.com 装配图网版权所有   联系电话:18123376007

备案号:ICP2024067431-1 川公网安备51140202000466号


本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知装配图网,我们立即给予删除!