Макрос в Word который зачеркивает в тексте все слова, в которых есть символы разных шрифтов - VBA

Узнай цену своей работы

Формулировка задачи:

Очень нужен макрос для Word, который зачеркивает в тексте все слова, в которых есть символы разных шрифтов. Вообще не представляю как это сделать.

Решение задачи: «Макрос в Word который зачеркивает в тексте все слова, в которых есть символы разных шрифтов»

textual
Листинг программы 
Sub Wa()
Dim w As Range
  For Each w In ActiveDocument.Words
    If w.Font.Name = "" Then w.Font.StrikeThrough = True
  Next
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.2 из 5
Похожие ответы