Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 2 ]
- fishfishec
- рядовой
- Неактивен
- Зарегистрирован: 28.02.2012
- Сообщений: 1
Тема: Как добавить символ?
Имеется файл doc более 1000 страниц. В нем есть некоторое количество абзацов жирным шрифтом. Остальной текст - обычный шрифт. Мне нужно перед каждым жирным абзацом поставить знак + .
Например, текст:
аааа
ААА
А
аа
аа
АА
нужно чтобы стал:
аааа
+ААА
А
аа
+аа
АА
Как сделать автоматически? Спасибо!
- aap77
- генерал-полковник
- Неактивен
- Зарегистрирован: 12.09.2011
- Сообщений: 925
- Поблагодарили: 243
- За сообщение: 1
Re: Как добавить символ?
Вот самый простой макрос который перебирает все абзацы Активного документа и если 1 знак абзаца жирный и не равен + то добавляет знак + в начало абзаца и выводит информацию об отмеченных абзацах
Public Sub AddPlus()
Dim prg As Paragraph, ch As Characters, i As Long
i = 0
For Each prg In ActiveDocument.Paragraphs
If prg.Range.Characters.First.Font.Bold = True Then
If prg.Range.Characters.First.Text <> "+" Then
prg.Range.InsertBefore ("+")
i = i + 1
End If
End If
Next prg
MsgBox "Абзацев отмеченных знаком «+»: " & i, vbInformation
End Sub
Сообщений [ 2 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Как добавить символ?
Большинство пользователей владеет начальными знаниями по работе с текстом в Microsoft Word. Но как невозможно делать сложные расчеты без высшей математики, так и работать с большим объемом текста, обладая только базовыми знаниями, это сизифов труд. Наш сайт о Microsoft Office Word даст ответ про: ворд 2010 шаблоны.
Поэтому, овладев основами, стоит расширять и углублять свои навыки.
Тут хорошим подспорьем служат специализированные сайты. Наш сайт о Microsoft Office Word даст ответ про: при печати из word ошибка.
Один из лучших русскоязычных – Ворд Эксперт. На сайте вы найдете необходимую информацию, на форуме сайта можете тренировать свои практические навыки, разобраться с возникающими проблемами. На портале о Microsoft Office Word вы узнаете про: как снять режим правок в ворд.
На форуме имеются разделы, посвященные оптимизации и автоматизации работе в Ворде, также вы можете оставить заявку и получить готовое решение проблемы. На портале о Microsoft Office Word вы узнаете про: рамки в word 2010.