Cum să îndrăznești toate instanțele aceluiași cuvânt într-un document Word?
Dacă există mai multe texte „outlook” în fișierul dvs. Word, acum trebuie să formatați toate textele „outlook” ca aldine. Cum ați putea îndrăzni toate instanțele aceluiași cuvânt într-un document Word mare cât mai repede posibil?
Îndrăznește toate instanțele aceluiași cuvânt într-un document Word cu cod VBA
Îndrăznește toate instanțele aceluiași cuvânt într-un document Word cu cod VBA
Următorul cod VBA vă poate ajuta să îndrăzniți toate instanțele unui anumit cuvânt rapid și ușor, vă rugăm să procedați astfel:
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Apoi, faceți clic Insera > Module, copiați și lipiți codul de mai jos în modulul gol deschis:
Cod VBA: Bold toate instanțele din același cuvânt
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. După introducerea codului, apoi apăsați F5 pentru a-l rula și apare o casetă de dialog pentru a vă reaminti introducerea cuvântului pe care doriți să-l îndrăzniți, vedeți captura de ecran:
4. Apoi, faceți clic OK și toate cuvintele specifice au fost formatate ca bold în același timp.
Cele mai bune instrumente de productivitate de birou
Kutools pentru Cuvânt - Crește-ți experiența Word cu Over 100 Caracteristici remarcabile!
🤖 Asistent AI Kutools: Transformă-ți scrisul cu AI - Generați conținut / Rescrie textul / Rezumat documente / Solicitați informații pe baza Documentului, toate în Cuvânt
📘 Stăpânirea documentelor: Pagini împărțite / Fuzionați documente / Exportați selecția în diferite formate (PDF/TXT/DOC/HTML...) / Conversie lot în PDF / Exportați paginile ca imagini / Imprimați mai multe fișiere simultan...
✏ Editarea continutului: Găsiți și înlocuiți în lot peste mai multe fișiere / Redimensionați toate imaginile / Transpuneți rânduri și coloane de tabel / Convertiți tabelul în text...
🧹 Curățare fără efort: Îndepărtați Spații suplimentare / Secțiuni pauze / Toate anteturile / Casete text / hiperlinkuri / Pentru mai multe instrumente de îndepărtare, mergeți la nostru Eliminați grupul...
➕ Inserții creative: Inserați Mii de separatori / Casete de bifare / Butoane radio / QR Code / coduri de bare / Tabel cu linii diagonale / Legenda ecuației / Image Caption / Legenda tabelului / Imagini multiple / Descoperiți mai multe în Inserați grupul...
???? Selectii de precizie: Repera cu precizie pagini specifice / tabele / forme / paragrafele de titlu / Îmbunătățiți navigarea cu mai mult Selectați caracteristici...
⭐ Îmbunătățiri de stele: Navigați rapid în orice locație / inserarea automată a textului repetitiv / comutați fără probleme între ferestrele documentelor / 11 Instrumente de conversie...