痛點：網頁複製內容充滿多餘空行與空格

手動刪除極耗時，解決方案：撰寫 VBA 巨集 → 加入工具列按鈕 → 一鍵執行。

建立巨集步驟（Word 2007 為例，其他版本類似）

1. 啟動 Word → 關閉預設文件 → 「工具」→「巨集」→「Visual Basic 編輯器」。
2. 在專案視窗右鍵 Normal → 「插入」→「模組」。
3. 在模組視窗貼上以下程式碼：

Sub KongGe()
    Dim i As Paragraph, n As Long
    Application.ScreenUpdating = False
    For Each i In ActiveDocument.Paragraphs
        If Len(i.Range) = 1 Then
            i.Range.Delete
            n = n + 1
        End If
    Next
    Application.ScreenUpdating = True
    Options.AutoFormatAsYouTypeDeleteAutoSpaces = True
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = " "
        .Replacement.Text = ""
        .Wrap = wdFindContinue
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

4. 關閉 VBE，巨集自動儲存於 Normal.dotm。

加入工具列按鈕

1. 工具列右鍵 → 「自訂」→「命令」索引標籤 → 「分類」選 「巨集」。
2. 找到 Normal.模組1.KongGe → 拖曳至工具列任意位置。
3. 右鍵按鈕 → 「名稱」改為 「刪除空格和空行」 → 「更改按鈕圖示」選喜歡圖示 → 關閉自訂視窗。

使用方式

開啟需清理的文件 → 點選工具列「刪除空格和空行」按鈕 → 稍待片刻完成。若一次未清乾淨（複雜空行來源），再點一次即可。

注意

需調整 Word 巨集安全性設定允許執行。