使用OleContainer来显示EXCEL,怎么屏蔽右键菜单
1个回答
展开全部
屏蔽主窗口的菜单工具栏状态栏等代码:
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重命名自己需要的名字,多余的删除,看看效果还差多远。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询