用網(wǎng)絡(luò)來(lái)查找資料相當(dāng)方便是人所皆知的事實(shí)，找到相關(guān)的文章，自然是拷貝粘貼啦，當(dāng)然，拷貝的時(shí)候還需要點(diǎn)技巧，直接拷進(jìn)Word文檔有時(shí)候是相當(dāng)麻煩的，比較方便的做法是先拷進(jìn)記事本，然后再轉(zhuǎn)入word，這樣做的好處是除去表格以等網(wǎng)頁(yè)元素，只拷貝“純文本”。然而這樣做還不夠徹底：網(wǎng)頁(yè)上的文字，有時(shí)候?yàn)榱孙@示的美觀，段落之間往往存在著空白行，這就使得拷下來(lái)的文章變得篇幅巨大，打印出來(lái)極不美觀。面對(duì)只有個(gè)位數(shù)的資料，刪除這些空行自然相當(dāng)簡(jiǎn)單，手動(dòng)一下就可以了，但當(dāng)你面對(duì)著兩位數(shù)的，甚至三位數(shù)的文章時(shí)，那簡(jiǎn)直就是災(zāi)難！當(dāng)然，Word這么成熟的編輯軟件，理應(yīng)有方便的方法使用達(dá)到刪除這些空行的目的！下面就介紹兩種簡(jiǎn)單實(shí)用的方法。
方法一：查找替換法。相信這個(gè)方法是比較簡(jiǎn)單實(shí)用的，但用起來(lái)有一點(diǎn)兒麻煩。在輸入查找字符的時(shí)候，換段符是這樣表示的“^p”，手動(dòng)換段(即shift+enter產(chǎn)生的符號(hào))符是這樣表示的“^l”，其中的"l"是小字的L。那么，替換的方法就是把所有的“^l”先換成“^p”，再將所有的“^p^p”換成“^p”。當(dāng)然，在此操作之前，需要先把所有的空格都替換掉。
方法二：使用宏。宏其實(shí)是個(gè)好東西，只不過(guò)平常比較少人去接觸它。并且出于安全性的考慮，Word默認(rèn)的情況下是沒(méi)有啟用它的，需要先進(jìn)行安全性設(shè)置，允許你自己選擇是啟用宏，還是不啟用宏。它其實(shí)是一段VB小程序，事實(shí)上，Word的大部分功能就是使用宏編寫出來(lái)的，只不過(guò)它們已經(jīng)經(jīng)過(guò)內(nèi)置設(shè)定，使用者在GUI界面操作它們，根本不知道它們實(shí)際上是怎么來(lái)的。知道了這些知識(shí)背景之后，對(duì)宏大概沒(méi)有那么抵抗心理了吧？好，只要把下面這段VB代碼，復(fù)制到你的自定義宏庫(kù)中去，然后運(yùn)行它，就可以一鍵消除所有的空行了！具體辦法：
1，打開(kāi)WORD，打開(kāi)“工具-宏-Visual Basic編輯器”，在Visual編輯器左邊，你會(huì)看到工程-project欄目，欄目中一般會(huì)包含兩個(gè)項(xiàng)，一個(gè)是“Normal”，另一個(gè)是“Project(Doc1)”，其中(Doc1)是你所打開(kāi)的WORD文檔的名稱。前者為WORD共用程序庫(kù)，后者為單一文檔程序庫(kù)。如果你把代碼寫在前者里面，那你本機(jī)在本機(jī)的其它文檔中，也可以使用，是“共用”的程序庫(kù)；若為后者，則只有所在文檔才能使用，同時(shí)，也可以能過(guò)拷貝具體文檔，將宏帶者，前者則不行。
2，雙擊期中的“Thisdocument”（兩者任選），打開(kāi)代碼輸入窗口，在其中輸入以下代碼：
Sub KillEmptyRows()
'刪除空行,by不見(jiàn)不散,2006-1-15
Dim p As Paragraph
Dim r As Range
Dim s As String
Dim l As Long
For Each p In ActiveDocument.Paragraphs
Set r = p.Range
s = CStr(r.Text)
l = Asc(s)
If (l = 13 Or l = 11) Then r.Text = ""
Next p
End Sub
保存，關(guān)閉Visual Basic編輯器，返回WORD界面。此時(shí)再打開(kāi)“工具-宏”，在“宏的位置”中選擇“所有模版和活動(dòng)文檔”（因?yàn)椴恢滥闶谴嬖谀０嬷校€是在單個(gè)文檔中，此選擇可以保證兩者皆可顯示），你會(huì)在上方窗口的“宏名”中看到一個(gè)KillEmptyRows的宏，選擇運(yùn)行即可！
兩種方法，各有優(yōu)缺點(diǎn)，選用哪個(gè)，就要看你自己的喜好咯！
方法一：查找替換法。相信這個(gè)方法是比較簡(jiǎn)單實(shí)用的，但用起來(lái)有一點(diǎn)兒麻煩。在輸入查找字符的時(shí)候，換段符是這樣表示的“^p”，手動(dòng)換段(即shift+enter產(chǎn)生的符號(hào))符是這樣表示的“^l”，其中的"l"是小字的L。那么，替換的方法就是把所有的“^l”先換成“^p”，再將所有的“^p^p”換成“^p”。當(dāng)然，在此操作之前，需要先把所有的空格都替換掉。
方法二：使用宏。宏其實(shí)是個(gè)好東西，只不過(guò)平常比較少人去接觸它。并且出于安全性的考慮，Word默認(rèn)的情況下是沒(méi)有啟用它的，需要先進(jìn)行安全性設(shè)置，允許你自己選擇是啟用宏，還是不啟用宏。它其實(shí)是一段VB小程序，事實(shí)上，Word的大部分功能就是使用宏編寫出來(lái)的，只不過(guò)它們已經(jīng)經(jīng)過(guò)內(nèi)置設(shè)定，使用者在GUI界面操作它們，根本不知道它們實(shí)際上是怎么來(lái)的。知道了這些知識(shí)背景之后，對(duì)宏大概沒(méi)有那么抵抗心理了吧？好，只要把下面這段VB代碼，復(fù)制到你的自定義宏庫(kù)中去，然后運(yùn)行它，就可以一鍵消除所有的空行了！具體辦法：
1，打開(kāi)WORD，打開(kāi)“工具-宏-Visual Basic編輯器”，在Visual編輯器左邊，你會(huì)看到工程-project欄目，欄目中一般會(huì)包含兩個(gè)項(xiàng)，一個(gè)是“Normal”，另一個(gè)是“Project(Doc1)”，其中(Doc1)是你所打開(kāi)的WORD文檔的名稱。前者為WORD共用程序庫(kù)，后者為單一文檔程序庫(kù)。如果你把代碼寫在前者里面，那你本機(jī)在本機(jī)的其它文檔中，也可以使用，是“共用”的程序庫(kù)；若為后者，則只有所在文檔才能使用，同時(shí)，也可以能過(guò)拷貝具體文檔，將宏帶者，前者則不行。
2，雙擊期中的“Thisdocument”（兩者任選），打開(kāi)代碼輸入窗口，在其中輸入以下代碼：
Sub KillEmptyRows()
'刪除空行,by不見(jiàn)不散,2006-1-15
Dim p As Paragraph
Dim r As Range
Dim s As String
Dim l As Long
For Each p In ActiveDocument.Paragraphs
Set r = p.Range
s = CStr(r.Text)
l = Asc(s)
If (l = 13 Or l = 11) Then r.Text = ""
Next p
End Sub
保存，關(guān)閉Visual Basic編輯器，返回WORD界面。此時(shí)再打開(kāi)“工具-宏”，在“宏的位置”中選擇“所有模版和活動(dòng)文檔”（因?yàn)椴恢滥闶谴嬖谀０嬷校€是在單個(gè)文檔中，此選擇可以保證兩者皆可顯示），你會(huì)在上方窗口的“宏名”中看到一個(gè)KillEmptyRows的宏，選擇運(yùn)行即可！
兩種方法，各有優(yōu)缺點(diǎn)，選用哪個(gè)，就要看你自己的喜好咯！