用vba如何屏蔽excel2002的所有的快捷键及右键菜单,我只想显示表格,达到让人看不出是execel软件的程度,能办
2个回答
展开全部
在你写这些之前也有必要考虑自己下次用时方便不!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
屏蔽主窗口的菜单工具栏状态栏等代码:
Application.CommandBars("Worksheet Menu Bar").Enabled = False '菜单栏
Application.DisplayFormulaBar = False '编辑栏
Application.DisplayStatusBar = False '状态栏
Application.CommandBars("Standard").Visible = False '常用工具栏
Application.CommandBars("Formatting").Visible = False '格式工具栏
Application.CommandBars("Standard").Enabled = False '常用工具栏
Application.CommandBars("Formatting").Enabled = False '格式工具栏
要屏蔽右键菜单,在 Workbook_SheetBeforeRightClick 中写上一句
Cancel = True
如果您再把这些Sheet重命名自己需要的名字,多余的删除,看看效果还差多远。
Application.CommandBars("Worksheet Menu Bar").Enabled = False '菜单栏
Application.DisplayFormulaBar = False '编辑栏
Application.DisplayStatusBar = False '状态栏
Application.CommandBars("Standard").Visible = False '常用工具栏
Application.CommandBars("Formatting").Visible = False '格式工具栏
Application.CommandBars("Standard").Enabled = False '常用工具栏
Application.CommandBars("Formatting").Enabled = False '格式工具栏
要屏蔽右键菜单,在 Workbook_SheetBeforeRightClick 中写上一句
Cancel = True
如果您再把这些Sheet重命名自己需要的名字,多余的删除,看看效果还差多远。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询