У меня большой объем текста (почти 100 страниц), пока я менял размер шрифта, я выделил все, изменив размер шрифта и надстрочного индекса. На самом деле мне не нужны надстрочные индексы, как я могу удалить все, что имеет надстрочный формат?
2 ответа
Это можно сделать с помощью простой операции поиска и замены.
В диалоговом окне « Найти и заменить » нажмите «
Format > Font
:Выберите верхний индекс:
Не вводите текст в поля « Найти что» и « Заменить на» и просто нажмите « Заменить все»:
Для этого вам, вероятно, понадобится слово macro. Я не верю, что есть другой способ сделать это. Чтобы сделать макрос, нажмите alt+f11. Дважды щелкните этот документ и вставьте этот код
Sub Demo()
With ActiveDocument.Content.Find
.ClearFormatting
.Text = "*"
.Font.Superscript = True
With .Replacement
.ClearFormatting
.Text = ""
End With
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = True
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
End Sub
в нее, а затем нажмите маленькую зеленую стрелку сверху или нажмите F5
источники:
http://answers.microsoft.com/en-us/office/forum/office_2007-word/macro-to-remove-superscripts/733b2b38-5767-4a7c-a6ce-85d1d593bd23