本文介紹一種使用Word自帶的宏功能來刪除word文檔中的空ge與空行的方法。通過這個方法,可以在word中添加一個按鈕,通過這個按鈕就可以自動一鍵刪除word中的所有空ge與空行了,具體操作方法如下所述。
(1)啟動word,關(guān)閉默認打開的word文檔;
(2)單擊菜單欄中的“工具-宏-visual basic編輯器”,會出現(xiàn)"visual basic編輯器";
(3)在"visual basic編輯器"窗口中,右擊"Normal",選擇“插入-模塊”,插入一個模塊;
(4)在"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
(5)代碼輸入完畢后,退出"visual basic編輯器”;
(6)右擊工具欄的任意位置,在出現(xiàn)的菜單中選擇“自定義”,打開“自定義”窗口并切換到“命令”選項卡,選項中“類別”列表框下邊的“宏”選項,這時“命令”列表框下邊就會出現(xiàn)一個名為“normal模塊1.kongge"的選項,選中這個選項,按住鼠標(biāo)左鍵不放將其拖到工具欄的任意位置。
這時工具欄上就會出現(xiàn)一個名為“normal模塊1.kongge"的命令按鈕,右擊這個命令按鈕,就會出現(xiàn)一個右鍵菜單,在這個右鍵菜單中我們主要進行以下操作。
1)將“命令”后邊文本框的內(nèi)容替換為“刪除空ge和空行”。
2)執(zhí)行“更改按鈕圖像”命令,在出現(xiàn)的子菜單中選中一個自己比較喜歡的圖標(biāo)(如紅心圖標(biāo))。
完成以上兩個步驟的操作之后,最后關(guān)閉“自定義”窗口。
通過以上幾步,我們就完成了工具欄中的“刪除空ge和空行”按鈕的添加工作,以后需要刪除某個WORD文檔中的空ge和空行時,只須打開該word文檔,再單擊工具欄中的“刪除空ge和空行”按鈕,稍等片刻,word文檔中的空ge和空行就被全部刪除了。
小提示:當(dāng)我們將一個網(wǎng)頁另存為一個將文本文件并將文本文件中的所有內(nèi)容復(fù)制到word中進行編輯時,由于空行產(chǎn)生的復(fù)雜性,單擊“刪除空ge和空行”按鈕可能一次不能刪除全部空行,這時,再單擊一次這個按鈕,就能全部刪除了。
另外錄入并應(yīng)用這個宏的時候請調(diào)整你的word宏安全設(shè)置。
新聞熱點
疑難解答
圖片精選