ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 57236|回复: 113

[原创] 【Excel+Flash】演绎动态交互热力地图图表

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2011-9-16 11:44 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

前段时间在Economist经济学人网站看到一款不错的Flash动态图表,效果如下:

aaa.png

原文链接在此:http://www.economist.com/content/all_parities_china


        功能这么强大、这么炫的图表,不拿来利用岂不可惜?于是通过分析结构和代码,与Excel相结合开发了现在这个工具:【中国数据地图】。

【中国数据地图】,是一款Excel与Flash相结合的动态交互地图图表工具,使用VBA开发。主要功能是利用现有的Flash格式的地图图表(Flash源文件来自于Economist),通过Excel对其进行数据关联控制和显示设置控制,并可直接在Excel中显示此动态交互图表。

目前的功能如下:

1,可设置和修改四个字段的数据
       2,可修改四个图表页的标签、标题、脚注等信息
       3,可修改热力图的颜色配置和数值分档
       4,解决Win7和Vista系统中的兼容问题,各系统均可使用
       5,暂不支持中文显示  

555.png


【使用前的设置】

此程序是VBA程序,打开Excel工作簿时需要启用宏才能正常工作。

此程序中包含Flash文件,需要Flash播放器的插件支持,因此请尽量安装最新版的FlashPlayer,否则可能会影响加载显示。FlashPlayer下载地址:

官方下载:http://get.adobe.com/cn/flashplayer/

PCOnline下载:http://dl.pconline.com.cn/html_2/1/114/id=8122&pn=0.html





【程序使用说明】

下载压缩包,解压以后包含两个文档,一个是Excel主文档,另一个是名为”main“的swf文档,且swf文档不能更改为其他的文件名。两个文档要放置在同一个目录下,并且需要保证目录路径中不包含中文字符稳妥起见,应尽量使用系统管理员身份打开程序,并且尽量不要在系统所在盘符下存放和运行程序(包括桌面),以免造成图表无法正常加载显示

打开Excel工作簿并启用宏,里面包含两个工作表,名为”map“的工作表中可以显示动态交互地图图表,名为”ChinaData“的工作表中可以对图表数据和图表显示设置进行修改。不要更改这两个工作表的表名称。

在交互地图图表中,可以随鼠标移动实时显示鼠标所在省区的数据,并且在右侧条形图中高亮显示对应的数据条。单击某个省区或在”select“下拉列表中选择某个省区可以放大显示地图,点击右下方的”Reset map“按钮则可以恢复全图显示。上方包含了四个标签页,可以切换不同的数据图表,显示不同的数据字段内容。


111.png


222.png



在”ChinaData“工作表中可以根据用户需要,设置自己的字段名和数据内容。也可以对图表中的显示进行设置修改。无论是数据修改还是设置修改,都需要在最后点击”更新图表“按钮方可生效,否则即使保存工作簿也不会对图表产生影响。

具体设置内容的说明见下图所示:


333.png



【其他说明】

本程序经过改进,在WindowsXP、Win7或Vista系统均可正常使用

如果由于某些未知原因造成工作簿中的Flash图表无法正常显示,其他功能仍然有效。可以在保持工作簿打开的状态下,直接在工作簿所在的目录下使用FlashPlayer软件打开”main.swf“文档进行图表的浏览和显示。工作簿中进行的数据和设置修改,在点击”更新图表“按钮以后,仍能与Flash正常保持更新(flash文档需关闭后重新打开)。

【常见问题解决】

1,图表页显示空白,可能原因:没有启用宏,或工作簿所在目录下main.swf文档不存在或被更名。

2,图表页显示英文错误代码,可能原因:FlashPlayer版本过低,或文件目录的路径中包含中文字符(例如“...\桌面\test”等等)

3,图表页仅显示条形图,不显示地图,可能原因:通常发生在Win7系统中,需要切换到Administrator登录,打开运行一下程序,然后关闭再切换回到原先的登录用户即可正常使用。


【作品8】中国数据地图V1.1.rar (716.16 KB, 下载次数: 5449)


  


评分

9

查看全部评分

TA的精华主题

TA的得分主题

发表于 2011-9-16 11:46 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2011-9-16 12:02 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
不看不知道,一看吓一条。

TA的精华主题

TA的得分主题

发表于 2011-9-16 15:34 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
不错,学习!

TA的精华主题

TA的得分主题

发表于 2011-9-17 22:30 | 显示全部楼层

还是方版最牛

本帖最后由 goons 于 2011-9-17 22:32 编辑

感谢分享,牛人很多哦

TA的精华主题

TA的得分主题

发表于 2011-9-18 00:16 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2011-9-20 14:36 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2011-9-20 15:30 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
我承认我是被标题护佑进来的,不过还真是吓了一跳!强大!

TA的精华主题

TA的得分主题

发表于 2011-9-20 17:26 | 显示全部楼层
我前几天刚刚看到这个图,正在琢磨呢,楼主已经做出来了,正是强啊,佩服的五体投地啊

TA的精华主题

TA的得分主题

发表于 2011-9-22 13:18 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-26 16:28 , Processed in 0.050618 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表