Conas téacs a roghnú nó a scriosadh idir dhá leabharmharc i ndoiciméad Word?
An bhfuil a fhios agat conas an t-ábhar idir dhá leabharmharc i ndoiciméad Word a roghnú nó a scriosadh? Taispeánfaidh an t-alt seo modhanna duit chun déileáil leis.
Roghnaigh / scrios téacs idir dhá leabharmharc le VBA
Roghnaigh / scrios téacs idir dhá leabharmharc le VBA
Má cheaptar go bhfuil dhá leabharmharc i do dhoiciméad mar a thaispeántar thíos, is féidir leat gach ábhar idir an dá leabharmharc seo a roghnú nó a scriosadh leis an gcód VBA seo a leanas.
1. Sa doiciméad, brúigh an Eile + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil, ansin cóipeáil thíos an cód isteach i bhfuinneog an Mhodúil.
Chun téacsanna a roghnú nó a scriosadh idir dhá leabharmharc, bain úsáid as an gcód seo:
Cód VBA: Roghnaigh téacs idir dhá leabharmharc sonraithe i Word:
Sub SelectBetweenBookmarks()
Dim xRange As Range
Dim xBMone, xBMtwo As Bookmark
Dim xBookMarkOne, xBookMarkTwo As String
On Error Resume Next
Set xRange = ActiveDocument.Content
xBookMarkOne = InputBox("Please enter the start bookmark:", "Kutools for Word")
xBookMarkTwo = InputBox("Please enter the end bookmark:", "Kutools for Word")
Set xBMone = ActiveDocument.Bookmarks(xBookMarkOne)
Set xBMtwo = ActiveDocument.Bookmarks(xBookMarkTwo)
If xBMone Is Nothing Or xBMtwo Is Nothing Then
MsgBox "Please enter the correct bookmark name", vbInformation, "KuTools for Word"
Exit Sub
End If
xRange.Start = xBMone.Range.End
xRange.End = xBMtwo.Range.Start
xRange.Select
End Sub
Cód VBA: Scrios téacs idir dhá leabharmharc sonraithe i Word:
Sub DeleteBetweenBookmarks ()
Dim xRange As Range
Dim xBMone, xBMtwo As Bookmark
Dim xBookMarkOne, xBookMarkTwo As String
On Error Resume Next
Set xRange = ActiveDocument.Content
xBookMarkOne = InputBox("Please enter the start bookmark:", "Kutools for Word")
xBookMarkTwo = InputBox("Please enter the end bookmark:", "Kutools for Word")
Set xBMone = ActiveDocument.Bookmarks(xBookMarkOne)
Set xBMtwo = ActiveDocument.Bookmarks(xBookMarkTwo)
If xBMone Is Nothing Or xBMtwo Is Nothing Then
MsgBox " Please enter the correct bookmark name ", vbInformation, "KuTools for Word"
Exit Sub
End If
xRange.Start = xBMone.Range.End
xRange.End = xBMtwo.Range.Start
xRange.Delete
End Sub
3. Brúigh an F5 eochair chun an cód a rith.
4. Sa chéad cheann Kutools le haghaidh Word bosca dialóige, cuir isteach an t-ainm leabharmharc tosaigh sa bhosca téacs agus cliceáil OK.
5. Sa dara ceann Kutools le haghaidh Word bosca dialóige, iontráil an leabharmharc deiridh agus cliceáil OK. Féach an pictiúr:
nótaí: Mura bhfuil an t-ainm leabharmharc a chuir tú isteach ann i ndoiciméad, nochtfaidh bosca dialóige eile Kutools for Word chun a mheabhrú duit an ceann ceart a iontráil.
Ansin roghnaítear nó scriostar gach ábhar idir na leabharmharcanna sonraithe láithreach. Féach screenshots.
Roghnaigh téacsanna idir dhá leabharmharc:
Scrios téacsanna idir dhá leabharmharc.
Uirlisí Táirgiúlachta Oifige is Fearr
Kutools le haghaidh Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!
🤖 Cúntóir Kutools AI: athraigh do chuid scríbhinn le AI - Gin Ábhar / Athscríobh Téacs / Déan achoimre ar Dhoiciméid / Fiosraigh le haghaidh Faisnéise bunaithe ar Doiciméad, ar fad laistigh de Word
📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/HTML...) / 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, ceann chuig ár Bain Grúpa...
➕ Ionsáigh Cruthaitheach: cuir isteach 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ó sa Cuir isteach Grúpa...
🔍 Roghanna Beachtais: Pionta leathanaigh ar leith / táblaí / cruthanna / míreanna ceannteideal / Feabhsaigh an loingseoireacht le níos mó Roghnaigh gnéithe...
⭐ 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...