半圆型动态仪表盘风格图表
▼
下午在浏览论坛的时候,刚好看到秋叶老师的一个图表教程,风格是半圆型饼图,用VBA控制。
查看了一下后台的VBA代码,有点小复杂,不过勉强能看懂,自己试了一把,确实可行。
Sub 动起来()
Dim i As Integer, t As Long
For i = 1 To 78
i = i + 1
Range("b4") = i & "%"
t = GetTickCount
Do
If GetTickCount - t > 5 Then Exit Do
DoEvents
Loop
Next
End Sub
然后就想分享给大家,不过鉴于代码太长大家可能接受不了,所以自己稍微改造了一下,使用了随机函数+VBA自动刷新的组合功能,效果勉强看得过去!
这是原图数据结构:
图表是一个较小的饼图和一个较大的圆环图组合而成。饼图内的指针是由E5单元格的数值0.01模拟。
具体的做法参见之前的一篇推送《绩效管理工具:仪表盘风格图表》(或回复061查看)。
GIF图动态效果如下图所示。
右侧的数据控制图表中较小的饼图,左侧的数据控制图表中外层的圆环图。
而所有数据中B4单元格中的数据由VBA控制:
Sub 动起来()
Dim i As Integer, t As Long
For i = 1 To 78
i = i + 1
Range("b4") = i & "%"
t = GetTickCount
Do
If GetTickCount - t > 5 Then Exit Do
DoEvents
Loop
Next
End Sub
B4单元格数据范围1%~80%,B5单元格、E4单元格、E6单元格都由B4单元格控制。
圆环图与饼图的第一扇区都起始于270%。
下面跟大家介绍自己改造过的半圆型动态仪表。
数据结构图表都与以上介绍过的相同,维一不同的是控制单元格的方法:
这个图表B15单元格是有RAND()函数控制(rand函数可以随机生成0~1之间的小数)
这里主要介绍一下怎么制作自动更新的图表数据标签和自动刷新的VBA代码。
大家可以看到在动态GIF图表中点击刷新之后,随着B15单元格随机变动,其中数据同步变动,最终带动图表变动,而且图表顶部的数据表也同步变动。
数据标签更新的是B15的数据,插入文本框,将鼠标移入文本框,然后在编辑框种输入“=B15”,然后再修改文本框的框线颜色、背景颜色。
另一方面,rand函数需要使用F9键刷新,才能更新数据,但是小魔方比较懒,不想每次都去按F9,所以直接写了一个自动刷新的VBA语句。
Sub 刷新()
Calculate
End Sub
看吧实在是太简单了。
sub()
……
End Sub
这是VBA的固定语句,就相当于见面打招呼都会说:“你好,再见”一样。
起作用的只有中间那句:calculate ,大概就是从新计算的意思吧。
然后从开发工具中插入一个按钮,打开VBA编辑器,复制以上代码:
然后把按钮制定到刚才新建的宏。
然后点击刷新按钮,就可以看到效果了。
- (49) 剖析LinkedHashMap / 计算机程序的思维逻辑
- Python多进程并行编程实践-mpi4py的使用
- 华为面试题——一道关于指针方面的编程题(C/C++)
- Spring Cloud第二篇 创建一个Eureka Server
- 数据挖掘实战(一):Kaggle竞赛经典案例剖析
- 华为面试题——单向链表倒转(一次遍历)
- Flask一步步搭建web应用
- (44) 剖析TreeSet / 计算机程序的思维逻辑
- (46) 剖析PriorityQueue / 计算机程序的思维逻辑
- (48) 剖析ArrayDeque / 计算机程序的思维逻辑
- 那些年在win下填过的Django坑
- Python爬虫一步步抓取房产信息
- (47) 堆和PriorityQueue的应用 / 计算机程序的思维逻辑
- 一篇文章完全理解virtualenv
- JavaScript 教程
- JavaScript 编辑工具
- JavaScript 与HTML
- JavaScript 与Java
- JavaScript 数据结构
- JavaScript 基本数据类型
- JavaScript 特殊数据类型
- JavaScript 运算符
- JavaScript typeof 运算符
- JavaScript 表达式
- JavaScript 类型转换
- JavaScript 基本语法
- JavaScript 注释
- Javascript 基本处理流程
- Javascript 选择结构
- Javascript if 语句
- Javascript if 语句的嵌套
- Javascript switch 语句
- Javascript 循环结构
- Javascript 循环结构实例
- Javascript 跳转语句
- Javascript 控制语句总结
- Javascript 函数介绍
- Javascript 函数的定义
- Javascript 函数调用
- Javascript 几种特殊的函数
- JavaScript 内置函数简介
- Javascript eval() 函数
- Javascript isFinite() 函数
- Javascript isNaN() 函数
- parseInt() 与 parseFloat()
- escape() 与 unescape()
- Javascript 字符串介绍
- Javascript length属性
- javascript 字符串函数
- Javascript 日期对象简介
- Javascript 日期对象用途
- Date 对象属性和方法
- Javascript 数组是什么
- Javascript 创建数组
- Javascript 数组赋值与取值
- Javascript 数组属性和方法
- php给数组赋值的实例方法
- php实现分页功能的详细实例方法
- 浅谈Laravel中的三种中间件的作用
- laravel 使用auth编写登录的方法
- laravel框架 laravel-admin上传图片到oss的方法
- php实现推荐功能的简单实例
- php实现登录页面的简单实例
- Laravel 自带的Auth验证登录方法
- laravel实现上传图片的两种方式小结
- Laravel开启跨域请求的方法
- Laravel 5.4前后台分离,通过不同的二级域名访问方法
- Yii框架数据库查询、增加、删除操作示例
- 在laravel5.2中实现点击用户头像更改头像的方法
- laravel 多图上传及图片的存储例子
- Laravel 添加多语言提示信息的方法