excel自己的菜单 无效,用我自己的保存,和邮件发送 菜单。我用vb做的程序。
解决方案 »
- 用DIR函数实现递归调用时,有时没事,有时报错
- 谁会用vsFlexGrid控件树状显示数据??
- 【散分】终于可放200分了,正好又要过年了,放分。顺便请大家讨论一下VB|.NET|DELPHI....
- 如何察看ODBC那些API的定义?
- 请教一下,adocon.execute()与command.execute的区别
- 征求解决方案
- ODBC的用户DSN和系统DSN有什么不同?
- 请问如何在窗体中动态生成 [ 文本框 ] 并且窗体显示不下时使用滚动条?急,急,急,急,急,急,急 ............
- 用VB怎么能运行一个批处理程序?
- MSHFlexGrid???
- ???请问如何使 鼠标在控件上停留一定的时间就 显示它的注释。???
- 怎样判断鼠标在线上?
'Application.CommandBars(1).Controls("工具(&T)").Visible = False
'Application.CommandBars(1).Controls("编辑(&E)").Visible = False
'Application.CommandBars(1).Controls("窗口(&W)").Visible = False
'Application.CommandBars(1).Controls("数据(&D)").Visible = False
'Application.CommandBars(1).Controls("帮助(&H)").Visible = False
'Application.CommandBars(1).Controls("视图(&V)").Visible = False
'Application.CommandBars(1).Controls("格式(&O)").Visible = False
'Application.CommandBars(1).Controls("插入(&I)").Visible = False
'Application.CommandBars(1).Controls("文件(&F)").Visible = False
如果菜单名字被人为的改变了,那么就不能操控菜单了.
或者参考以下的:
Application.CommandBars(1).Controls(1).Visible = False
Application.CommandBars(1).Controls(1).Visible = true
不然你用EXCEL的时候就麻烦了!:)