一系列 Microsoft 試算表軟體,具有可用來對資料進行分析、製圖及通訊的工具
Jack Yang SBC,
你好!
按Alt+F8進入宏,輸入任意字符,然後點擊創建,復制下面的代碼重置excel設置。
=================================================
Sub RecoverExcel()
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
End Sub
=================================================
此致敬禮,
Snow Lu