【图表】 闹钟可以这样做

向前冲

想法来源于 图表中级班201301期 练习8
http://www.excelpx.com/thread-301457-1-1.html

雷达图的难点是数据的构建，这个闹钟全部由雷达图完成，按F9指针可以走动。

hongqiqqq

感谢分享
认真学学

jb_008

谢谢分享，努力            

gaoshuichang1

时钟图表.zip (22.94 KB, 下载次数: 28)

2013-6-3 15:11 上传

点击文件名下载附件

如果再配上以下代码时钟就活了：
Private Sub Workbook_Open()
[a1] = WorksheetFunction.Text(Now(), "hh:mm:ss")
Application.OnTime Now() + TimeValue("00:00:01"), "显示时间"
End Sub

Sub 显示时间()
[a1] = WorksheetFunction.Text(Now(), "hh:mm:ss")
Application.OnTime Now() + TimeValue("00:00:01"), "显示时间"
End Sub

eison347@126.co

按完F9之后，不会自动走？

feiaoli

太深奥了、、、、、、、、、

xlz2124

太给力了，多谢分享！

amiaosheng

哇 太强大了  

大白梨

太强大了-------====

司洛

                        {:35:}