2 moduri de a schimba în lot textele în indice sau indice în documentul Word

În articolul de astăzi, am dori să vă arătăm 2 moduri de a grupa textele de modificare în superscript sau indice în documentul dvs. Word.

Uneori, trebuie să schimbăm anumite texte dintr-un document Word în exponente sau indici, mai ales când există mai multe instanțe ale aceluiași text. În astfel de circumstanțe, înlocuirea în lot este ceea ce avem cea mai mare nevoie. Din acest motiv, vă oferim 2 metode rapide pentru a realiza această sarcină.

Metoda 1: Folosiți funcția „Găsiți și înlocuiți”.

În cuprinsul următor, vom folosi eșantionul „DataNumen Word Repair v2.5” ca demonstrație. Scopul nostru este să înlocuim „v2.5” ca indice.

1. În primul rând, faceți clic pe fila „Acasă”.
2. Apoi faceți clic pe „Înlocuire” pentru a deschide caseta de dialog „Găsiți și înlocuiți”.
3. Mai întâi introduceți „v2.5” în caseta de text „Găsiți ce”. Nu uitați să introduceți un spațiu înainte de text.
4. Apoi introduceți „v2.5” în caseta de text „Înlocuire cu”. Nu există spațiu înainte de text de data aceasta.
5. Apoi faceți clic pe butonul „Mai multe” pentru a extinde mai multe opțiuni.
6. Acum faceți clic pe „Format” și alegeți „Font”.
7. În caseta de dialog „Găsiți font”, bifați caseta „Superscript” sau „Subscript”.
8. Apoi faceți clic pe „OK”.
9. În cele din urmă, faceți clic pe butonul „Înlocuiește tot”.

Puteți verifica efectul aici:

Metoda 2: Înlocuirea lotului prin rularea unei macrocomenzi Word

1. Pentru început, apăsați „Alt+ F11” pentru a declanșa editorul VBA.
2. Apoi faceți clic pe proiect „Normal” și apoi pe fila „Inserare”.
3. Alegeți „Modul” din meniul derulant.
4. Apoi faceți dublu clic pe noul modul pentru a deschide zona de codare.
5. Lipiți următoarea macrocomandă acolo:

Sub ReplaceTheTextAsSubscript()
  Dim strSelectText As String
  Dim strReplaceText As String
 
  strSelectText = InputBox("Enter the text you want to search", "Select text", "For example: v2.5")
  strReplaceText = InputBox("Enter the text you want to replace with", "Replace text", "For example:v2.5")
 
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find.Replacement.Font
    .Superscript = False
    .Subscript = True
  End With
  With Selection.Find
    .Text = strSelectText
    .Replacement.Text = strReplaceText
    .Forward = True
    .Wrap = wdFindContinue
    .Format = True
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

6. Faceți clic pe „Run”.
7. Mai întâi există caseta „Selectați text”. Introduceți textul de căutare și faceți clic pe „OK”. În acest caz, tastați „v2.5”.
8. Apoi există caseta „Înlocuiește text”. Introduceți textul de înlocuire acolo și faceți clic pe „OK”. Tastați „v2.5”.

Dacă trebuie să schimbați textele în superscript, puteți utiliza această macrocomandă:

Sub ReplaceTheTextAsSuperscript()
  Dim strSelectText As String
  Dim strReplaceText As String
 
  strSelectText = InputBox("Enter the text you want to search", "Select text", "For example: v2.5")
  strReplaceText = InputBox("Enter the text you want to replace with", "Replace text", "For example:v2.5")
 
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find.Replacement.Font
    .Superscript = True
    .Subscript = False
  End With
  With Selection.Find
    .Text = strSelectText
    .Replacement.Text = strReplaceText
    .Forward = True
    .Wrap = wdFindContinue
    .Format = True
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Remediați erorile de document

Greșelile de cuvinte nu sunt străine majorității dintre noi. O prăbușire a unui Word poate duce la o corupt docx fişier. Pentru a rezolva o astfel de problemă, trebuie să obțineți un instrument calificat și profesionist pentru a recupera documentul spart.

Introducerea autorului:

Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv xlsx corupt și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com