（轉載）Excel文檔保存的時候，提示「文檔未保存」

親測，成功搞定

 

Excel文檔保存的時候，提示「文檔未保存」？

先打開你須要處理的excel，而後打開工具欄--宏--錄製新宏--肯定--中止錄製宏--宏-宏--編輯--複製如下程序Sub 恢復保存()
    name0 = ActiveWorkbook.Name
    j = Sheets.Count
    For i = 1 To j
        Sheets(1).Visible = -1
        Sheets(1).Move
        Sheets(1).Move after:=Workbooks(name0).Sheets(j - 1)
    Next
End Sub

而後接着運行宏，後中止。最後關閉便可！

最近發現較多此問題，解決方法就是每一個表移出去再移回來就能夠了。
若是懂得使用宏，寫法以下，說白了就是將每一個表移出去再移回去。