Conas illínte a chumasc nó a chomhcheangal in aon mhír amháin i ndoiciméad Word?
Má tá na céadta agus na mílte mír i do dhoiciméad Word, agus an doiciméad seo á phriontáil, beidh go leor páipéar ag teastáil uaidh. Maidir le páipéir choigiltis, is féidir leat na línte iolracha sin a chumasc in aon mhír amháin. Ach, conas a d’fhéadfá na línte seo go léir a chomhcheangal in aon mhír go tapa agus go héasca i ndoiciméad Word?
Cumaisc nó comhcheangail línte iolracha in aon mhír amháin le feidhm Aimsigh agus Ionadaigh
Cumaisc nó comhcheangail línte iolracha in aon mhír amháin le cód VBA
Cumaisc nó comhcheangail línte iolracha in aon mhír amháin le feidhm Aimsigh agus Ionadaigh
An Aimsigh agus Ionadaigh is féidir le feidhm i Word cabhrú leat línte iolracha a chumasc in aon mhír amháin, déan mar seo é le do thoil:
1. Roghnaigh na hailt is mian leat a chumasc in aon mhír amháin.
2. Agus ansin, cliceáil Baile > Aimsigh > Lorg Casta dul an Aimsigh agus Ionadaigh bosca dialóige, sa Aimsigh agus Ionadaigh bosca dialóige, faoin Aimsigh cluaisín, cuir isteach le do thoil ^p isteach sa Aimsigh cad bosca téacs, agus ansin roghnaigh Roghnú Reatha rogha ón Faigh Isteach liosta anuas, féach an scáileán:
3. Ansin téigh go dtí an Ionadaigh cluaisín, agus fág an Ionadaigh le bosca téacs folamh, agus ansin cliceáil Ionadaigh uile cnaipe, féach ar an scáileán:
4. Agus rinneadh na míreanna roghnaithe go léir a chumasc in aon mhír amháin, féach an pictiúr:
Cumaisc nó comhcheangail línte iolracha in aon mhír amháin le cód VBA
Seo modh úsáideach eile a chabhróidh leat an post seo a chríochnú i Word, déan na céimeanna seo a leanas le do thoil:
1. Roghnaigh na línte a theastaíonn uait a chumasc in aon mhír amháin.
2. Ansin, coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
3. Agus ansin, cliceáil Ionsáigh > Modúil, cóipeáil agus greamaigh an cód thíos sa mhodúl bán oscailte.
Cód VBA: Cumaisc línte iolracha in aon mhír amháin:
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. Agus ansin brúigh F5 eochair chun an cód seo a rith, agus tá na míreanna roghnaithe go léir curtha le chéile in aon mhír mar a thaispeántar an pictiúr a leanas:
Uirlisí Táirgiúlachta Oifige is Fearr
Kutools for Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!
Léim isteach sna gnéithe aibhsithe thíos nó cliceáil anseo chun cumhacht iomlán na Kutools for Word.
📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/XLSX) / Baisc a thiontú go PDF / Easpórtáil Leathanaigh mar Íomhánna / Priontáil Comhaid Il ag an am céanna ...
✏ Eagarthóireacht na nÁbhar: Faigh Baisc agus Ionadaigh thar Chomhaid Il / Athraigh Méid Gach Pictiúr / Trasnaigh Rónna Tábla agus Colúin / Tiontaigh Tábla go Téacs ...
🧹 Effortless Glan: Sguab as Spásanna Breise / Sosanna Alt / Gach Ceanntásca / Boscaí Téacs / Hipearnasc / Le haghaidh tuilleadh uirlisí a bhaint, téigh chuig ár Bain Grúpa
➕ Ionsáigh Cruthaitheach: Ionsáigh Míle Deighilteoir / Boscaí Seiceála / Cnaipí Raidió / Cód QR / barcode / Tábla Líne Trasnánach / Fotheideal Cothromóid / Fotheideal Íomhá / Fotheideal Tábla / Pictiúir Il / Faigh amach níos mó inár Insert Group
🔍 Roghanna Beachtais: Pinpoint leathanaigh ar leith / táblaí / cruthanna / míreanna ceannteideal / Déan nascleanúint gan stró ag baint úsáide as ár Roghghrúpa
⭐ Feabhsuithe Réalta: Déan nascleanúint go tapa chuig aon láthair / cuir isteach téacs athchleachtach go huathoibríoch / scoránaigh gan uaim idir fuinneoga doiciméad / 11 Uirlisí Tiontaithe ...
Trasfhoirmigh do thascanna Word le Kutools. 👉 Íoslódáil le triail 30 lá Anois 🚀.
