excel自己的菜单 无效,用我自己的保存,和邮件发送 菜单。我用vb做的程序。

解决方案 »

  1.   

    '隐藏excel菜单
        '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
      

  2.   

    同意xlhl(顽皮兔子) 但是...
    如果菜单名字被人为的改变了,那么就不能操控菜单了.
    或者参考以下的:
    Application.CommandBars(1).Controls(1).Visible = False
      

  3.   

    在退出程序的时候在把
    Application.CommandBars(1).Controls(1).Visible = true
    不然你用EXCEL的时候就麻烦了!:)