Sut i feiddio pob achos o'r un gair mewn dogfen Word?
Awdur: Xiaoyang Wedi'i Addasu Diwethaf: 2024-08-26
Os oes yna nifer o destunau "rhagolygon" yn eich ffeil Word, nawr mae angen i chi fformatio'r holl destunau "rhagolygon" yn feiddgar. Sut allech chi feiddgar pob enghraifft o'r un gair mewn dogfen Word fawr cyn gynted â phosibl?
Beiddgar pob achos o'r un gair mewn dogfen Word gyda chod VBA
Beiddgar pob achos o'r un gair mewn dogfen Word gyda chod VBA
Gall y cod VBA canlynol eich helpu i feiddio pob achos o air penodol yn gyflym ac yn hawdd, gwnewch fel hyn:
1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Ac yna, cliciwch Mewnosod > Modiwlau, copïo a gludo islaw'r cod i'r modiwl gwag agored:
Cod VBA: Yn drwm pob achos o'r un gair
Sub BoldAll()
Dim xStr As String
xStr = InputBox("Please enter the word that you want to bold:", "KuTools for Word")
If Trim(xStr) = "" Then
MsgBox "Cann’t be empty!", vbInformation, "KuTools for Word"
End If
With ActiveDocument.Content.Find
.ClearFormatting
.Text = xStr
.Replacement.ClearFormatting
.Replacement.Font.Bold = True
.Replacement.Text = "^&"
.Wrap = wdFindStop
.Format = True
.Forward = True
.Execute Replace:=wdReplaceAll
End With
End Sub
3. Ar ôl mewnosod y cod, ac yna pwyswch F5 allwedd i'w redeg, ac mae blwch deialog wedi'i popio allan i'ch atgoffa i fewnosod y gair rydych chi am ei feiddgar, gweler y screenshot:
4. Ac yna, cliciwch OK botwm, ac mae'r holl eiriau penodol wedi'u fformatio fel rhai beiddgar ar unwaith.
Gwnewch Mwy mewn Llai o Amser gyda Kutools wedi'i Wella gan AI ar gyfer Word
Nid set o offer yn unig yw Kutools ar gyfer Word - mae'n ddatrysiad smart sydd wedi'i gynllunio i roi hwb i'ch cynhyrchiant. Gyda galluoedd a yrrir gan AI a'r nodweddion mwyaf hanfodol, mae Kutools yn eich helpu i gyflawni mwy mewn llai o amser:
- Cynhyrchu cynnwys sy'n cyfateb yn berffaith i'ch anghenion.
- Trawsnewidiwch eich ysgrifennu gyda dros 20 o arddulliau ysgrifennu, gan sicrhau ei fod yn ddi-fai.
- Crynhowch eich dogfen mewn un clic.
- Cyfieithwch eich cynnwys i dros 40 o ieithoedd yn rhwydd, gan ehangu eich cyrhaeddiad yn fyd-eang.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, ac os oes gan Kutools yr offeryn, bydd y Cynorthwy-ydd AI yn cyflawni'ch tasg ar unwaith ar eich gorchymyn, gan roi pŵer llawn Word ar flaenau eich bysedd.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
- Cynhyrchu, ailysgrifennu, crynhoi, a chyfieithu cynnwys gyda chliciau.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, a bydd y Cynorthwy-ydd AI yn cyflwyno'r offeryn cywir ac yn cyflawni'r dasg, neu'n eich tywys trwy'r camau.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
Dysgwch fwy am Kutools ar gyfer Word Lawrlwytho NawrOffer Cynhyrchiant Swyddfa Gorau
Kutools am Word - 100+ Offer ar gyfer Word