资源描述
1
打开Excel表格,按下Alt+F11键,打开VBE编辑器,插入一个模块,粘贴以下代码,按F5键运行即可恢复.
sub 恢复右键菜单()
Application.CommandBars(”Cell”)。Enabled = True
Application。CommandBars(”column")。Enabled = True
Application。CommandBars(”row")。Enabled = True
Application.CommandBars(”ply")。Enabled = True
End sub
2
.删除*.xlb文件,方法是:关闭excel---—开始--—搜索--—输入“*。xlb"-—-—搜索出这个文件删除它—-——重新启动excel。(注意,删除*。xlb文件也将删除所有工具栏和菜单栏的自定义设置!
一般在这里:
C:\Users\当前用户名\AppData\Roaming\Microsoft\Excel路径下的所有内容。
3
一定是打开过带宏的文件,然后就悲剧了。
当我重新打开新的excel文件,右键到处都不好使,单元格右键没用,行没用,列没用,工作表名称那里也不行,编辑栏也失效.
于是找了两个小时以后,找到了方法:
1. 打开新excel文件
2. alt+F11, Ctrl+G
3.找到菜单栏里的“运行宏”,输入宏名称“一键修复Excel”,这时候下面加载宏的地方是“VBA project”,点击“创建”
4.在“Sub 一键修复Excel()"和 end sub之间,复制:
Dim i As Byte
On Error Resume Next
Application。ScreenUpdating = False
For i = 1 To 155
Application。CommandBars(i).Reset
Application.CommandBars(i).Enabled = True
Application。CommandBars(i).Visible = False
Next
Application。CommandBars(”Status Bar”).Visible = True
For i = 1 To 4
Application.CommandBars(i)。Visible = True
Next
With Application
.OnKey "^c”
。OnKey "^v"
.OnKey "^x"
.OnKey ”+{DEL}"
.OnKey "+{INSERT}”
.CellDragAndDrop = True
。OnDoubleClick = ”"
End With
Application.ScreenUpdating = True
MsgBox ”大功告成!" & ”你的Excel已恢复。” & Chr(10) & ”所有自定义菜单、按钮及功能限制均已解除。", 64, "【友情提示】"
5.复制这段代码,从sub到endsub,点击绿色的运行按钮,出来
,点击运行
6。大功告成!!!!!!!!!!!
4
终极大招当然是重装软件了
展开阅读全文