2010年11月22日 星期一

VBA:恢復工具列

試著試著,Excel 的 toolbar 、 menu 都不見了,幸好找到以下的程式碼。不用重裝。


Sub Recover1()
    Dim cmb As CommandBar
   On Error Resume Next
    For Each cmb In Application.CommandBars
        cmb.Visible = True
        cmb.Enabled = True
    Next cmb
End Sub

沒有留言: