個人積分：4176分
文章編號：91914052
個人積分：1814分
文章編號：91914511
guies wrote:
整個檔案幾百MB，現在無論是拷貝、刪除、VBA刪除、Kutools.for.Excel工具等，
不是執行無反應，就是直接跳掉，或直接當掉幾小時還在無回應等等。
路過說笑話，excel最不需要的就是用樞紐分析，樞紐分析代表公司是大型智障辦公室
中小企業，分頁就不該多，單頁資料筆數1000~3000就差不多，再超過的話，只代表一件事
辦公室是集體智障，而製作人是懶鬼，分類就該分別建立在檔案與頁數上
excel有很多基礎功能，就不需要靠寫程式就能做到，但是遇到程式工程師，他就習慣寫程式
路人老闆主管看到就會，哇，好厲害
採購、財務、生管人員就不該浪費時間在寫程式上，這種人應該去當程式工程師
程式工程師就不該寫華麗的程式，結果寫出毫無其他專業邏輯、與生活背離，自我感覺美好的程式，就像win vista 8 11
解釋一下工程師寫華麗程式最常見的錯誤，就是代入個人立場
舉例：
一個沒pdca觀念的工程師，就會寫出一個高效率，但是沒pdca制度的程式
到目前為止都還沒什麼是非對錯的事
問題來自於後續金主要求時，工程師腦迴路卻堅持不願意寫
個人積分：4251分
文章編號：91917610
個人積分：2145分
文章編號：91920327
個人積分：3分
文章編號：91924060
---
✅ 你的目標是：
保留前 20,000 行（實際使用 1 萬多行），移除後面多餘資料與欄格式污染，讓 Excel 回歸正常可用狀態。
---
⚠ 為什麼會連 64GB RAM 都卡死？
Excel 無法處理那些「無形但有格式的千萬格空白資料」，你嘗試複製時，它其實在拷貝幾千萬格的「格式、條件式、樣式」，而不是表面上的幾十行。
---
✅ 解法（推薦從簡到進階）
🟢 方法 1：用 Power Query 匯入前 2 萬列
1. 開啟一個 全新的 Excel 檔。
2. 點選：
資料 → 取得資料 → 自活頁簿 → 瀏覽舊檔案
3. 選擇含問題的 Excel 檔案 → 點選正確的工作表。
4. 在 Power Query 編輯器中，按下：
首列 → 篩選 → 保留前 20000 列
5. 然後按「關閉並載入」。
➡️ 這樣會直接只載入前 20000 列資料，不會帶入垃圾格式，也可以在新檔操作正常。
---
🟡 方法 2：用 Excel VBA 擷取前幾列資料（不複製整個格式）
1. 開啟一個新工作簿，按 Alt + F11 開啟 VBA 編輯器。
2. 插入新模組並貼上以下程式碼：
Sub CopyTop20000Rows()
Dim sourceWB As Workbook
Dim sourceWS As Worksheet
Dim destWS As Worksheet
Dim filePath As String
filePath = Application.GetOpenFilename("Excel Files (*.xlsx), *.xlsx", , "選取來源檔案")
If filePath = "False" Then Exit Sub
Set sourceWB = Workbooks.Open(filePath, ReadOnly:=True)
Set sourceWS = sourceWB.Sheets(1)
Set destWS = ThisWorkbook.Sheets(1)
sourceWS.Range("A1:AQ20000").Copy
destWS.Range("A1").PasteSpecial xlPasteValues
destWS.Range("A1").PasteSpecial xlPasteFormats
sourceWB.Close False
Application.CutCopyMode = False
MsgBox "完成複製前 20000 行的資料！"
End Sub
3. 關閉 VBA 編輯器，執行這段巨集，即可載入乾淨版。
---
🔴 方法 3：強制「清除最終使用行/列」再另存
這會用 VBA 移除 Excel 記憶中的「最大使用範圍」。
1. 開啟原始檔（需備份！）。
2. Alt + F11，貼上這段 VBA 程式碼：
Sub CleanUsedRange()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.UsedRange ' 強制重算 UsedRange
Next ws
MsgBox "已嘗試重設使用範圍，請儲存後重開檔案觀察效果。"
End Sub
3. 執行後，儲存並重新開啟檔案，有時 Excel 會自動釋放空格資料。
> 但這方法不保證清乾淨，也不能移除格式垃圾，建議配合 Power Query 重建新檔。
---
🧼 建議防止這種問題的未來做法：
教導員工不要對整張表格全選後改格式（如點左上角框）。
建議固定開發模板並鎖定格式。
若用 VBA 或範本系統，可限制資料欄位與輸入範圍。
使用 Power Query / Access 來做資料收集與整理，而不是直接用 Excel 原始檔拼接分析。
---Chat gpt
