1、Sub Macro1()
With Application.VBE.CommandBars("Menu Bar") .Enabled = True
End With
End Sub
2、输入以上代码点击运行
3、 b = .Enabled 'True
b = .Visible 'True
i = .Index '1
s = .Name 'Menu Bar
p = .Protection '8
r = .RowIndex '1 to 3
t = .Type '1
h = .Height '26
w = .Width '1127
l = .Left '0
tp = .Top '0
'.Left = 0
'.Top = 0
'.Reset
'.Enabled = True
'.Visible = True