1、屏蔽“菜单”中的项:
Application.CommandBars(1).Controls("文件(&F)").Enabled = False '屏蔽文件菜单
Application.CommandBars(1).Controls("编辑(&E)").Enabled = False '屏蔽编辑菜单
Application.CommandBars(1).Controls("视图(&V)").Enabled = False '屏蔽视图菜单
Application.CommandBars(1).Controls("插入(&I)").Enabled = False '屏蔽插入菜单
Application.CommandBars(1).Controls("格式(&O)").Enabled = False '屏蔽格式菜单
Application.CommandBars(1).Controls("工具(&T)").Enabled = False '屏蔽工具菜单
Application.CommandBars(1).Controls("数据(&D)").Enabled = False '屏蔽数据菜单
Application.CommandBars(1).Controls("窗口(&W)").Enabled = False '屏蔽窗口菜单
Application.CommandBars(1).Controls("帮助(&H)").Enabled = False '屏蔽帮助菜单
2、屏蔽“菜单”中的子项:
Application.CommandBars(