基于地图选择的Excel动态图表

single_star · 发表于 2010-1-25 13:57

附档为放在一般工作表中图表事件的参考(有mouse move)

(试了一下插入图形也会有ID的,似乎比图形当标记更好区别判定)

[ 本帖最后由 single_star 于 2010-1-25 14:29 编辑 ]

dul · 发表于 2010-1-25 14:13

楼上的附件中的立交平面图确实不错，赞一个

single_star · 发表于 2010-1-26 10:13

附档为我把楼主的各省地图放在图表中,鼠标移动至该省后会自动变色并显示省名(图名)

[ 本帖最后由 single_star 于 2010-1-26 18:39 编辑 ]

dul · 发表于 2010-1-26 10:22

原帖由 single_star 于 2010-1-26 10:13 发表
附档为我把楼主的各省地图放在图表中,鼠标移动至该省后会自动变色并显示省名(图名)

不错好东西

jatzhang · 发表于 2010-1-26 10:58

为什么我一执行那个宏就报错呢？
在这句卡住了： If myChartClass.Shapes(1).ControlFormat.Value = 1 Then

提示“运行时错误 '438'
对象不支持该属性或方法”

single_star · 发表于 2010-1-26 11:09

原帖由 jatzhang 于 2010-1-26 10:58 发表
为什么我一执行那个宏就报错呢？
在这句卡住了： If myChartClass.Shapes(1).ControlFormat.Value = 1 Then

提示“运行时错误 '438'
对象不支持该属性或方法”

我在图表中加了核取方块(放在最底层)做为是否执行图表事件判断用,可以将此行代码及对应的End If删除
或新增核取方块并放在最底层即可避免报错

[ 本帖最后由 single_star 于 2010-1-26 11:13 编辑 ]

tjfx · 发表于 2010-1-26 11:15

原帖由 single_star 于 2010-1-26 10:13 发表
附档为我把楼主的各省地图放在图表中,鼠标移动至该省后会自动变色并显示省名(图名)

厉害呀，看不懂，能解释下就好了

single_star · 发表于 2010-1-26 11:39

我的是繁体版不好引用说明,楼主可参考excel vba以下相关的说明
GetChartElement
event(关键字)中圖表事件相关说明及范例

[ 本帖最后由 single_star 于 2010-1-26 12:03 编辑 ]

jatzhang · 发表于 2010-1-26 12:42

原帖由 single_star 于 2010-1-26 11:09 发表

我在图表中加了核取方块(放在最底层)做为是否执行图表事件判断用,可以将此行代码及对应的End If删除
或新增核取方块并放在最底层即可避免报错

明白了，我把复选框链接到单元格，改用单元格数据判断，通过~~~~
发现个小BUG：地图里有北京、天津、宁夏几个区域选择不上，把他们附近其他省的图片移到底层就可以了，呵呵。

hxfw2008 · 发表于 2010-1-26 12:58

太好了，我这几天正需要这样的东东，真是雪中送碳，感谢楼主！！！！！！！！

		自动登录	找回密码
密码			免费注册

[分享] 基于地图选择的Excel动态图表