[分享]往工具栏添加动态LOGO一例

ldhyob · 发表于 2004-2-24 21:36

眼下很多流行的软件会把精美小巧的动态LOGO图标放在工具栏里，以增加软件界面的美观，如我们最常见的IE菜单右侧的徽标，在WINDOWS2000时代是一个旋转的地球，在XP时代则是一面飘动的四色徽标旗帜，尤其是它在IE访问站点的等待过程中，会侍机而动，很是富于创意。临渊羡鱼，不如退而结网，我们在EXCEL的VBA编程中能否也尝试一下模仿的乐趣呢？本帖所附示例将给您一个答案，仅供大家参考。图示

文档在此

h0Yo1tJJ.rar (80.35 KB, 下载次数: 289)

[此贴子已经被作者于2004-2-25 8:13:59编辑过]

ykcbf · 发表于 2004-2-24 22:41

看上去挺不错的东东啊

老刀 · 发表于 2004-2-24 22:57

总有新鲜的东西！好！

p123456789 · 发表于 2004-2-25 08:59

很棒

jongcheol · 发表于 2004-2-25 09:00

咱李家人,就一个字==============牛!!!!!!!!!!!

winak · 发表于 2004-2-25 09:01

Oh, My God! Very GOOD

taller · 发表于 2004-2-25 09:19

绝对是极品

兰色幻想 · 发表于 2004-2-25 09:58

很好，这正是我欠缺的，我有个奢望：楼主能不能详细解释一下其中代码的含义

chyzhen20 · 发表于 2004-2-25 10:02

做得很漂亮但我把以下代码单独提出来时，为什么不能隐藏我的格式和常用工具栏呢？ With Application
.Caption = "Microsoft Excel"
.CommandBars("Toolbar List").Enabled = True
.CommandBars("Worksheet Menu Bar").Controls("视图(&V)").Controls(3).Enabled = True
.CommandBars("LOGO").Delete
'If LOGO.Tag = 1 Then .DisplayFormulaBar = True
End With
谢谢

doyyi · 发表于 2004-2-25 13:03

好棒！

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