Форум программистов, компьютерный форум, киберфорум
MS Office Word
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 20.01.2016
Сообщений: 28
1

Изменить цвет первой буквы каждого абзаца текста

08.06.2020, 11:31. Просмотров 826. Ответов 2
Метки нет (Все метки)

Добрый день.
Подскажите как можно изменить цвет первой буквы каждого абзаца документа?
Пока в голову пришел только вариант с буквицей.
Код
    With Selection.Paragraphs(1).DropCap
        .Position = wdDropNormal
        .FontName = "+Основной текст"
        .LinesToDrop = 1
        .DistanceFromText = CentimetersToPoints(0)
    End With
То есть перебирать все абзацы и вставлять буквицу, а потом поменять цвет буквы.
Кстати как с помощью макроса можно поменять цвет буквицы? (Не могу записать рекордером)
Но может есть способ сделать это проще?
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.06.2020, 11:31
Ответы с готовыми решениями:

Удаление из текста первой гласной буквы каждого слова
Написать программу, которая считывает английский текст с клавиатуры и выводит его на экран, удалив...

Изменить цвет строк и цвет текста через одну в listbox
Всем привет! Есть код который изменят стиль и цвет строк и текста в datagridview For intCount...

Скопировать из текста фрагмент от первой встретившейся буквы 'а' до первой встретившейся буквы 'я' .
Скопировать из текста фрагмент от первой встретившейся буквы 'а' до первой встретившейся буквы 'я'...

Цвет первой буквы ссылки
Доброго времени суток, господа. Подскажите, возможно ли такое реализовать на CSS, и если можно, то...

2
Модератор
Эксперт MS Access
9827 / 3867 / 624
Регистрация: 07.08.2010
Сообщений: 10,969
Записей в блоге: 2
08.06.2020, 12:27 2
Лучший ответ Сообщение было отмечено Azrailll как решение

Решение

например так
Visual Basic
1
2
3
4
5
6
Sub par_c_1()
Dim pr As Paragraph
For Each pr In Word.ActiveDocument.Paragraphs
pr.Range.Characters(1).Font.ColorIndex = wdRed
Next pr
End Sub
0
0 / 0 / 0
Регистрация: 20.01.2016
Сообщений: 28
08.06.2020, 20:37  [ТС] 3
Спасибо, как то не подумал о таком способе.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2020, 20:37

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Как поменять цвет первой буквы в меню?
Коллеги, подскажите расскажите как поменять цвет первой буквы в меню на wordpress? вот пример:...

Изменить активный цвет первой ссылки при заходе
Как сделать так чтобы при заходе на страницу первая ссылка сразу же была активна, при клике на...

Для заданного текста получить две группы слов: к первой отнести слова, которые начинаются с гласной буквы, а ко второй – с согласной буквы
Для заданного текста получить две группы слов: к первой отнести слова, которые начинаются с гласной...

Вывод первой буквы каждого первого слова заголовка
Здравствуйте! есть слова расположенные в алфавитном порядке. нужно вывести первую букву первого...

После первой буквы каждого слова вставить символ “-”
После первой буквы каждого слова вставить символ “-”. Нужно в С++

Перевод в верхний регистр первой буквы каждого слова
Очень прошу помочь дело срочное!!!!! Задание выглядит так: Создать меню с командами разработчик...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.