如何隐藏菜单栏和所有常用工具栏呢？

horse0918 · 发表于 2010-7-27 16:33

学习了，，不过我测试过代码，可以设100，FOR　i=1 to 100是可以，255就不行了，
我不知道commandbars(i).enabled，其中的I最大能是多少？分别对应的菜单如何得知，期待有人解答。

dingcool · 发表于 2010-9-11 22:04

最下话一下就失效

dingcool · 发表于 2010-10-14 21:33

已成功实现所有序列

asdf159357 · 发表于 2010-10-19 20:34

拿来主义，拿去用了，嘿嘿

summerrain828 · 发表于 2011-6-24 18:44

你好:

請參考

Sub hidebar() Application.CommandBars(1).Enabled = False Application.DisplayFullScreen = True Application.CommandBars("Full Screen").Visible = False With ActiveWindow .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False End With End Sub

Sub unhidebar() Application.CommandBars(1).Enabled = True Application.DisplayFullScreen = False With ActiveWindow .DisplayHorizontalScrollBar = True .DisplayVerticalScrollBar = True End With End Sub
隐藏菜单栏不用这么多代码呀，那些滚动条，工作表标签，工具栏直接在工具选项就可搞定，只写代码隐藏菜单栏就可以了

jhzghua · 发表于 2011-6-25 08:53

留个脚印吧

820211639 · 发表于 2012-3-8 17:39

{:soso_e175:}

820211639 · 发表于 2012-3-9 15:07

{:soso_e179:}

z2h · 发表于 2012-3-9 15:48

kshurenada 发表于 2010-7-27 16:04
这个ok的先膜拜下
但是这样隐藏后，似乎还留着个恢复普通大小的按钮，一按就现原形了。怎么 ...

确实有这个问题，怎么回事？

anewbrand · 发表于 2014-11-16 23:15

上面代码，esc键，双击窗口上沿，最大最小化等，都会让菜单栏显示出来。或许应该找其他的办法，不用fullscreen

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

[已解决] 如何隐藏菜单栏和所有常用工具栏呢？

最新热点 /1