Excel鼠标右键功能失灵

倒腾vba首要是保证安全，各路大神的代码非常神奇，莫名的就让你的excel嘎嘣了，如出现右键无法使用（确定不是您的鼠标问题），那么以下代码可完全修复设置。

操作步骤：打开excel--->按“alt+F11"键打开vba编辑器--->选择"Thisworkbook"--->把下面的代码复制进去--->按"F5"执行--->大功告成

Sub 一键修复Excel（）
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, "【提示】"
End Sub

完毕

本文链接：https://niujc.com/an/1444559.html