Создание макроса для редактирование текста в Word - VBA

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

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

Создать макрос, который устанавливает двойной интервал между строками, выравнивает текст по левому краю страницы, формирует абзацный отступ 1,75 пт. Первое слово в предложении выделяет красным цветом. Столкнулся с проблемой, выделение красным цветом первого слова в предложение. Подскажите кто что может ps. код работает pss. код на изменение цвета отсутствует

Решение задачи: «Создание макроса для редактирование текста в Word»

textual
Листинг программы
Dim i As Long
Selection.WholeStory
   
 With Selection.ParagraphFormat
   .LineSpacing = LinesToPoints(2)
   .FirstLineIndent = CentimetersToPoints(1.75)
   .Alignment = wdAlignParagraphLeft
 End With
 
 For i = 1 To ActiveDocument.Sentences.Count
    ActiveDocument.Range.Sentences(i).Words(1).Font.Color = wdColorRed
 Next i

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


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

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

11   голосов , оценка 3.909 из 5