通過復制粘貼網絡資源得到的word文檔無用 空格 和空行很多,一一刪除非常麻煩,如果創建一個具有相關功能的 Word2007 宏,然後再往工具欄上添加一個按鈕,當我們單擊工具欄中的這個按鈕時,通過執行Word 宏 就可以實現一鍵刪除Word2007文檔中所有空格和空行了。 相關文章: 如何快速清楚Word2007中的空行 先啟動word2007(其他版本操作類似),然後關閉默認打開的Word文檔,再單擊“工具-宏- Visual Basic 編輯器”命令,調出“VisualBasic編輯器”,在“Visual Basic編輯器”窗口中,右擊“Normal”,選擇“插入-模塊”命令,插入一個模塊。 插入一個模塊後,在“Visual Basic編輯器”右邊自動打開的窗口中輸入以下代碼: 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 代碼輸入完畢後,退出Visual Basic編輯器,這時剛剛輸入的代碼就被自動保存了。 右擊工具欄的任意位置,在出現的菜單中選擇“自定義”,打開“自定義”窗口並切換到“命令”選項,選中“類別” 列表框下邊的“宏”選項,這時“命令”列表框下邊就會出現一個名為“Normal.模塊1.KongGe”的選項,選中這個選項,按住鼠標左鍵不放將其拖到工具欄的任意位置。 這時工具欄上就會出現一個名為“Normal.模塊1.KongGe”的命令按鈕,右擊這個命令按鈕,就會出現一個右鍵菜單,在這個右鍵菜單中我們主要進行以下操作: 1.將“命名”後邊 文本框 的內容替換成“刪除空格和空行”。 2.執行“更改按鈕圖像”命令,在出現的子菜單中選中一二自己比較喜歡的圖標(如紅心圖標)。 完成以上兩個步驟的操作之後,最後關閉“自定義”窗口。 至此,我們就完成了工具欄中“刪除空格和空行”按鈕的添加工作,以後需要刪除某個word文檔中的空格和空行時,只須打開該Word文檔,再單擊工具欄中的“刪除空格和空行”按鈕,稍等片刻,Word文檔中的空格和空行就被全部刪除了。 小提示:當我們將一個網頁另存為一個文本文件並將文本文件中的所有內容復制到word2007中進行編輯時,由於空行產生的復雜性(並不一定是回車下產生的空行),單擊“刪除空格和空行”按鈕可能一次不能刪除全部空行,這時,再單擊一次這個按鈕,就能全部刪除了。另外錄入並應用這個宏的時候請調整你的Word宏安全設置。