vb for excel问题！

Question

怎么样才能实现隐藏EXCEL的菜单拦？？？？

Answer 1

如果能用别的方法实现不能更改excel里的内容也是可以的！

Answer 2

請到這裡去看一下,可能會有你要的
http://www.jsfy.jsol.net/personal/vbhome/default.asp

Answer 3

Excel.CommandBars("Worksheet Menu Bar").Enabled = False

Answer 4

Application.CommandBars(0).Enabled = False

Answer 5

确切一点说我们还不知道你要在什么地方隐藏Excel的菜单栏，网页上，还是OLE中，还是ActiveX，还是VBA，还是直接的隐藏。

Answer 6

'隐藏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

Answer 7

vb程序中用的，以上几位都有分，继续请教，怎样实现让出来的excel不能编辑？？？
这个问题给20分！

Answer 8

Dim i As Long
    For i = 1 To excelapp.CommandBars.Count
        excelapp.CommandBars(i).Enabled = false
    On Error Resume Next
    Next i