一个是删除NORMAL.DOT,再开启WORD程序,便可自动恢复. 另一个方法是运行以下代码: '* +++++++++++++++++++++++++++++++++++++++ '* Created By I Love You_Word!@ExcelHome 2005-1-13 09:42:08 '仅测试于System: Windows NT Word: 10.0 Language: 2052 '^The Code CopyIn [ThisDocument-ThisDocument]^' '* -------------------------------------------------------------------------- '* +++++++++++++++++++++++++++++++++++++++ '* Created By I Love You_Word!@ExcelHome 2005-1-13 09:44:53 '仅测试于System: Windows NT Word: 10.0 Language: 2052 '^The Code CopyIn [ThisDocument-ThisDocument]^' '* -------------------------------------------------------------------------- Sub RestBar()
'恢复菜单栏
Application.CommandBars("Menu Bar").Enabled = True
'恢复常用工具栏
Application.CommandBars("Standard").Enabled = True
'恢复格式工具栏
Application.CommandBars("Formatting").Enabled = True
End Sub
'----------------------
|