EXCEL工作表中,重命名尀复制尀移动工作表选项是灰色的 无法用??

下拉菜单－工具－保护－撤消工作簿保护－输入密码，就撤消了

首先看看工具-保护 是不是被保护了；新建工作表如果也是这样子那就是你的系统问题重新装下OFFICE

Private Sub aaa()
On Error Resume Next
Dim i As Integer
On Error Resume Next
With Application
.DisplayStatusBar = True
.DisplayFormulaBar = True
.CommandBars("ToolBar List").Enabled = True
.CommandBars("Worksheet Menu Bar").Reset
.DisplayFormulaBar = iComB_Visible(0)
On Error Resume Next
For i = 1 To UBound(iComB_Visible) - 1
.CommandBars(1).Controls(i).Enabled = True
.CommandBars(iComB_Visible(i)).Visible = True
Next
End With
End Sub
建个模板 ，加到里面运行下就好了