各位好，我又來了，我遇到一個奇怪的狀況，全選複製就當機。

各位好：

最近我遇到越來越多有奇怪狀況的表格，只要複製就會當機，就算把所有文字都刪掉也是容量很大

個人猜測應該是物件造成的，所以我去找了可以刪除物件的語法（如下列）

但是就算執行這個語法來清除所有物件，執行的那瞬間電腦就會死Ｏrz

請問這純粹是因為工作電腦太爛，還是檔案真的太離譜？

有可能有辦法在不當機的情況下刪除所有物件嗎？

因為連複製都會當機，所以目前我個人的解決辦法是：先另存新檔成Unicode-TXT檔，然後另開一個新表格貼上去。

以前一天也就一兩個檔案，這樣處理還沒關係，但最近這種莫名其妙的狀況有變多的趨勢，不知道有沒有另存新檔以外的方法……

因為連下面這個VBA都能當機，我有點擔心……

-------------

Sub 刪除物件()

For Each shap In ActiveSheet.Shapes

shap.Select

Selection.Delete

Next

End Sub

-------------
下面是GoogleDrive檔案連結
https://ppt.cc/f6mGSx

請問有不會當機就能刪除物件的方法嗎（如果是因為工作台電腦太破那我放棄）