用vba创建的动态气泡图

橙橙_8787 · 发表于 2012-2-20 22:52

这就是我一直想做的动态气泡图啊，一直在找呢！

innocentor · 发表于 2012-5-23 21:31

学习了，但还是有些看不懂的地方。希望楼主讲解讲解。

jingjing7775 · 发表于 2012-5-24 10:57

不懂vba。。。但是欣赏啦

zhl210334wj · 发表于 2012-5-24 13:44

好好学习，天天向上！！！！谢谢分享

田野上的白杨树 · 发表于 2012-8-7 21:42

欣赏下了，日后提高自己

墨香雪 · 发表于 2012-12-20 11:20

楼主提供了一个好的方向

墨香雪 · 发表于 2012-12-20 11:21

{:soso_e134:}好像我不能点回复，只能写留言了

davidhawk · 发表于 2012-12-20 11:31

想起来我有一个无聊时做着玩的东西..

Private Sub Start_Click()
For p = 1 To Sheet1.Cells(12, 1)
  For i = 1 To 6
For j = 1 To 6
   t = Int(Rnd() * 3) - 1
   If Sheet1.Cells(i, j) + t <= 10 And Sheet1.Cells(i, j) + t >= 1 Then
      Sheet1.Cells(i, j) = Sheet1.Cells(i, j) + t
   End If
Next
  Next
  DoEvents
Next
End Sub

跳动的柱子.zip (25.87 KB, 下载次数: 59)

excelhome2018 · 发表于 2014-12-16 19:45

楼主你太牛了，但是想请教下怎么控制motion的速度呢？谢谢

excelhome2018 · 发表于 2014-12-16 19:47

excelhome2018 发表于 2014-12-16 19:45
楼主你太牛了，但是想请教下怎么控制motion的速度呢？谢谢

希望楼主能看到！！！

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

[原创] 用vba创建的动态气泡图