Note: The other languages of the website are Google-translated. Back to English

如何將多行合併或合併到Word文檔的單個段落中?

如果您的Word文檔中有成千上萬的段落,則在打印此文檔時,將需要大量紙張。 為了節省紙張,可以將這些多行合併為一個段落。 但是,如何在Word文檔中快速,輕鬆地將所有這些行組合為一個段落?

使用查找和替換功能將多行合併或合併為一個段落

使用VBA代碼將多行合併或合併為一個段落


使用查找和替換功能將多行合併或合併為一個段落

查找和替換 Word中的函數可以幫助您將多行合併為一個段落,請執行以下操作:

1。 選擇要合併為一個段落的段落。

2。 然後,單擊 首頁 > 發現 > 高級查找查找和替換 對話框中 查找和替換 對話框中的 發現 標籤,請輸入 ^p查找內容 文本框,然後選擇 當前選擇 選項從 尋找 下拉列表,請參見屏幕截圖:

doc合併多行1

3。 然後去看看 更換 標籤,然後離開 更換 文本框為空,然後單擊 “全部替換” 按鈕,請參見屏幕截圖:

doc合併多行2

4。 並且所有選定的段落已合併為一個段落,請參見屏幕截圖:

doc合併多行3


使用VBA代碼將多行合併或合併為一個段落

這是另一個有用的方法,也可以幫助您完成Word中的這項工作,請執行以下步驟:

1。 選擇要合併為一個段落的行。

2。 然後,按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

3。 然後,單擊 插入 > 模塊,將以下代碼複製並粘貼到打開的空白模塊中。

VBA代碼:將多行合併為一個段落:

Sub CleanUpPastedText()
    Dim xSelection As Selection
    On Error Resume Next
    Application.ScreenUpdating = False
Set xSelection = Application.Selection
    If xSelection.Type <> wdSelectionIP Then
        FindAndReplace xSelection
    Else
      If MsgBox("Do you want to merge all selected lines into one paragraph?", vbYesNo + vbInformation, "Kutools for Word") = vbNo Then Exit Sub
      xSelection.WholeStory
      Set xSelection = Application.Selection
      xSelection.HomeKey wdStory
      FindAndReplace xSelection
    End If
    Application.ScreenUpdating = True
    Application.ScreenRefresh
    MsgBox "The selected lines have been merged into one paragraph.", vbInformation, "Kutools for Word"
End Sub
Sub FindAndReplace(Sel As Selection)
    With Sel.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Forward = True
        .Wrap = wdFindStop
        .Format = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
        .Text = "[^s^t]{1,}^13"
        .Replacement.Text = "^p"
        .Execute Replace:=wdReplaceAll
        .Text = "([!^13])([^13])([!^13])"
        .Replacement.Text = "\1\3"
        .Execute Replace:=wdReplaceAll
        .Text = "[ ]{2,}"
        .Replacement.Text = " "
        .Execute Replace:=wdReplaceAll
        .Text = "([a-z])-[ ]{1,}([a-z])"
        .Replacement.Text = "\1\2"
        .Execute Replace:=wdReplaceAll
        .Text = "[^13]{1,}"
        .Replacement.Text = "^p"
        .Execute Replace:=wdReplaceAll
    End With
End Sub

4。 然後按 F5 鍵以運行此代碼,並且所有選定的段落都已合併為一個段落,如以下屏幕截圖所示:

doc合併多行4


推薦的Word生產力工具

 

Kutools For Word - 超過 100 Word 的高級功能, 節省您的 50% 時間

  • 複雜和重複的操作可以在幾秒鐘內完成一次處理。
  • 跨文件夾一次將多個圖像插入Word文檔。
  • 將文件夾中的多個Word文件合併並合併為所需順序。
  • 根據標題,分節符或其他條件將當前文檔拆分為單獨的文檔。
  • 在Doc和Docx之間,Docx和PDF之間轉換文件,用於常見轉換和選擇的工具集合等...
按評論排序
留言 (7)
還沒有評分。 成為第一位評論!
網站主持人對此評論進行了最小化
非常感謝
這有助於我節省手動執行此操作的時間,60 頁後 2 頁我累了,開始尋找其他快捷方式
謝謝
網站主持人對此評論進行了最小化
有沒有辦法在 google docs 上製作這個詞,我做了這些步驟,但這僅適用於 microsoft word 的桌面和在線版本
網站主持人對此評論進行了最小化
謝謝! 這節省了我幾個小時,我不必將 70 多頁的幾個斷句單獨折疊成段落。 這是天才。
網站主持人對此評論進行了最小化
我測試過的第一步已經足夠出色了。 這是我聽說過的最好的把戲。 謝謝!
網站主持人對此評論進行了最小化
謝了哥們
網站主持人對此評論進行了最小化
excelente, me salvaste la vida。
網站主持人對此評論進行了最小化
American Motors Concord 1978-1979 2.0LTS,American Motors Gremlin 1977-1978,American Motors Spirit 1979 2.0LTS 4L
Audi 100 1970-1971, Audi 100 1972-1977 1.9LTS 4L
Audi 100 1989-1991 2.3LTS 5L
Audi 100 1992-1994 2.8LTS 6V
奧迪 200 1989 2.2LTS 5L
奧迪 200 1990-1991 2.2LTS TURBO 5L
奧迪4000 1980
奧迪 4000 1980-1987
奧迪 4000 1981-1983
奧迪 4000 1984-1987
奧迪 5000 1978-1988
奧迪 5000 1987-1988
奧迪 80 1988-1990
奧迪 80 1988-1989
奧迪 80 1991-1992
奧迪 90 1988-1992
Audi 90 1988-1992 2.3LTS 5L
Audi 90 1993-1995 2.8LTS 6V
Audi A3 1997-2005 1.8LTS TURBO 4L
Audi A3 2008-2009 1.8LTS TURBO 4L
奧迪 A3 1997 2.0LTS DIESEL TURBO 5L
奧迪 A3 2004 2.0LTS 4L
Audi A3 2005-2006 2.0LTS MEX 4L
Audi A4 1995-1997 1.8LTS TURBO 4L
奧迪 A6 1995 2.8LTS 6V
奧迪 A6 1995 2.8LTS 電機:AFC 6V
奧迪敞篷車 1994-1995 2.8LTS 6V
奧迪 Coupe 1981-1987 2.2LTS 5L
奧迪 Coupe 1987-1991 2.3LTS 5L
奧迪福克斯 1973-1974 1.5LTS 4L
奧迪福克斯 1975-1979 1.6LTS 4L
奧迪 Quattro 1983-1986 2.2LTS 5L
Audi Rs6 2003-2004 4.2LTS 8V
Audi S3 2000-2004 1.8LTS 4L
Audi S4 1992-1994 2.2LTS TURBO 5L
奧迪 S6 1995 2.2LTS TURBO 5L
Audi S6 1996-1997 2.2LTS 5L
奧迪 Tt 2000-2006 1.8LTS TURBO 4L
Bmw 325 1986-1988 2.7LTS 6L
Bmw 325E 1984-1987 2.7LTS 6L
Bmw 325Es 1986-1987 2.7LTS 6L
Bmw 325I 1987-1992 2.5LTS 6L
Bmw 325Is 1987-1991 2.5LTS 6L
Bmw 325Ix 1988-1991 2.5LTS 6L
Bmw 525I 1989-1990 2.5LTS 6L
Bmw 528E 1982-1988 2.7LTS 6L
蓮花 Elan 1968-1975 1.6LTS 4L
龐蒂亞克 Sunrunner 1995-1997 1.6LTS 4L
Porsche 924 1977-1982 2.0LTS 4L
西雅特 Alhambra 1996-2000 2.0LTS 4L
西雅特 Alhambra 2002-2003 1.8LTS MEX 4L
西雅特 Alhambra 2004-2007 1.8LTS TURBO 4L
西雅特 Alhambra 2004-2005 2.8LTS 6V
西雅特 Altea 2004-2015 1.6LTS 4L
座椅 Cordoba 2001-2002 1.6LTS MEX 4L
座椅 Cordoba 2003-2004 2.0LTS MEX 4L
座椅 Cordoba 2005-2009 1.6LTS 4L
座椅 Cordoba 2005-2009 2.0LTS 4L
Seat Ibiza 2001-2002 1.6LTS MEX 4L
西亞特伊維薩 2003-2012 2.0LTS 4L
西亞特伊維薩 2004-2012 1.6LTS 4L
Seat Ibiza 2006 1.8LTS 4L
Seat Ibiza 2007 1.8LTS TURBO 4L
Seat Ibiza 2008 1.8LTS TURBO MEX 4L
西雅特 2001-2004 1.8LTS MEX 4L
西雅特 Leon 2001-2004 1.8LTS TURBO MEX 4L
西雅特 2005-2006 1.8LTS 4L
西雅特 2006 2.0LTS 4L
西雅特托萊多 2001-2003 1.8LTS MEX 4L
座椅 Toledo 2001-2003 1.8LTS TURBO MEX 4L
西雅特托萊多 2004-2005 1.8LTS 4L
西雅特 Toledo 2006 2.0LTS 4L
豐田海獅 1977-1979 2.0LTS 4L
豐田海拉克斯 1975-1989 2.0LTS 4L
豐田海拉克斯 1990-1993 1.8LTS 4L
大眾大西洋 1981-1982 1.6LTS 4L
大眾大西洋 1982-1987 1.8LTS 4L
大眾甲殼蟲 1998-2011 2.0LTS 4L
大眾甲殼蟲 1999-2005 1.8LTS TURBO 4L
大眾敞篷車 1995-2002 2.0LTS 4L
大眾敞篷車 1985-1993 1.8LTS 4L
大眾開迪 1982 1.5LTS 4L
大眾開迪 1993-1994 1.8LTS 4L
大眾加勒比 1982-1987 1.8LTS 4L
大眾 Combi 1990-2001 1.8LTS 4L
大眾 Combi 1997 2.8LTS 6 Cil
大眾 Corrado 1990-1992 1.8LTS SUPERCARGADO 4L
大眾Corsar 1984-1988 1.8LTS 4L
大眾 Dasher 1974-1975 1.5LTS 4L
大眾 Dasher 1976-1980 1.6LTS 4L
大眾德比 1994-2009 1.8LTS 4L
大眾德比 2001-2004 2.0LTS MEX 4L
大眾福克斯 1987-1993 1.8LTS 4L
大眾高爾夫 1985-2006 1.8LTS 4L
大眾高爾夫 1990-2010 2.0LTS 4L
大眾捷達 1980 1.6LTS 4L
大眾捷達 1981-1984 1.7LTS 4L
大眾捷達 1984-1999 1.8LTS 4L
大眾捷達 1990-2005 2.0LTS 4L
大眾捷達 2012-2013 2.0LTS 4L
大眾捷達 2001-2005 1.8LTS TURBO 4L
大眾捷達 2009-2012 1.8LTS TURBO 4L
大眾捷達 2006-2008 2.0LTS MEX 4L
大眾捷達 2011-2014 2.0LTS 發動機:CBPA 4L
大眾捷達 Clasico 2011-2015 2.0LTS 4L
大眾帕薩特 1990-1997 2.0LTS 4L
大眾帕薩特 1993 1.8LTS 4L
大眾帕薩特 2001 2.8LTS 電機:ATQ 6V
大眾指針 1998-2009 1.8LTS 4L
大眾指針皮卡 1999-2009 1.8LTS 4L
大眾波羅 2003-2007 2.0LTS 4L
大眾量子 1982-1983 1.7LTS 4L
大眾量子 1983-1988 2.2LTS 5L
大眾量子 1984-1985 1.8LTS 4L
大眾小兔 1975-1980 1.5LTS 4L
大眾小兔 1976-1980 1.6LTS 4L
大眾小兔 1981-1984 1.7LTS 4L
大眾小兔 1983-1984 1.8LTS 4L
大眾兔子敞篷車 1980 1.6LTS 4L
大眾兔子敞篷車 1981-1983 1.7LTS 4L
大眾兔子敞篷車 1984 1.8LTS 4L
大眾小兔皮卡 1980 1.5LTS 4L
大眾小兔皮卡 1980 1.6LTS 4L
大眾小兔皮卡 1981-1983 1.7LTS 4L
大眾尚酷 1975-1978 1.5LTS 4L
大眾尚酷 1976-1980 1.6LTS 4L
大眾尚酷 1981-1983 1.7LTS 4L
大眾尚酷 1984-1989 1.8LTS 4L
大眾轎車 1978-1979 1.6LTS 4H
大眾轎車 1993-2003 1.6LTS 4L
大眾夏朗 2002-2008 1.8LTS TURBO 4L
大眾超級甲殼蟲 1978-1980 1.6LTS 4H
大眾運輸車 1985 1.9LTS 柴油 4L
大眾運輸車 1986-1991 2.1LTS 4H
大眾運輸車 1990-1992 1.8LTS 4L
大眾運輸車 1990-1993 2.0LTS 4L
大眾麵包車 2003-2008
大眾 Vanagon 1983-1985
大眾 Vanagon 1986-1989
大眾 Vanagon 1990-1991
這裡還沒有評論
留下你的意見
以訪客身份發帖
×
評價此帖子:
0   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護