按住Alt键,再按VTCB,勾选“工作表菜单栏”,关闭对话框即可。
按ALT+11 进入VBA操作界面
选择菜单,插入,模块
复制以下代码
Sub adsf()
With Application
.DisplayFormulaBar = True
.DisplayStatusBar = True
.DisplayFormulaBar = True
.DisplayStatusBar = True
.CommandBars("Worksheet Menu Bar").Enabled = True
.CommandBars("Worksheet Menu Bar").Reset
.CommandBars("System").Enabled = True
.CommandBars("Document").Enabled = True
.CommandBars("Toolbar List").Enabled = True
.CommandBars("ply").Enabled = True
.CommandBars("Standard").Visible = True
.CommandBars("Formatting").Visible = True
End With
End Sub
然后按F5
希望可以帮到你
按一下 Esc键 看看