Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Доброго времени суток!
Подскажите, пожалуйста, как автоматизировать процес форматирования абзаца, по его первым символам, т.е.: если абзац начинается с тире и пробела (речь), то игнорировать, если сразу текст - добавить отступ первой строки абзаца (1,25 см). В аттаче приведён пример текста как выглядит до и должен выглядеть после форматирования.
Вот так, наверное.
Sub ConditionalFormat()
Dim opar As Paragraph
Set opar = ActiveDocument.Paragraphs.First
Do Until opar Is Nothing
If Left(opar.Range.Text, 2) = Chr(151) & " " Then
opar.FirstLineIndent = 0
Else
opar.FirstLineIndent = CentimetersToPoints(1.25)
End If
Set opar = opar.Next
DoEvents
Loop
End SubВ диалогах после тире должен идти неразрывный пробел.
Спасибо огромное, работает в лучшем виде. Есть ещё вопрос не в тему: что можно почитать по VBA, что бы описывались не сами основы программирования, а именно работа с элементами текста (слово, предложение, абзац, страница и т.д.)
Удивитесь, но почти всё есть в справке. По крайней мере, на первое время. Есть ещё рекомендуемый список литературы, но я могу порекомендовать только книгу Марка Розенберга "Microsoft Word. Комфортная работа с помощью макросов", которую стоит приобрести и держать у себя под рукой
Благодарю. Литерабуры действительно много, но вот стоящей, к сожалению, маловать 
Правда, если не ошибаюсь, у книги тираж всего 2000 экз.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Форматирование абзаца по его первым символам
Когда-то давно люди пересели с пишущих машинок за клавиатуру компьютера. И приветствовал их Microsoft Word. Наш сайт о Microsoft Office Word даст ответ про: как над буквой а поставить ударение. И дал он им жирный шрифт, полужирный, а еще курсив, множество стилей, таблиц и рисунков. Теперь те времена уже вошли в историю, а Word уходить не собирается. Наш сайт о Microsoft Office Word даст ответ про: как заменить заглавные на прописные буквы в эксель. Наоборот он все растет, расширяется, обзаводится новыми функциями и версиями.
Хотите доступную и понятную информацию по всем тонкостям работы с этим текстовым редактором? На портале о Microsoft Office Word вы узнаете про: как сделать тексть плотнее в word. Приходите на форум сайта Ворд Эксперт, в котором обсуждаются все вопросы и проблемы, связанные с различными версиями Word. На портале о Microsoft Office Word вы узнаете про: как умножить в ворде.
Если вы просто супер профессионал, то сможете предложить свои наработки в соответствующем разделе, если хотите совершенствовать свои знания, вас научат писать макросы, выбрать наиболее удобные настройки для тех операций, что часто делаете, предложат списать готовые решения или дать заявку. Наш сайт о Microsoft Office Word даст ответ про: кака сделать двойной пробел в ворде.
Форум отличается от многих компьютерных форумов прежде всего тем, что на Ворд Эксперт ориентация идет на простого или продвинутого пользователя, а не на горстку профи, которые общаются на птичьем языке. На портале о Microsoft Office Word вы узнаете про: как убрать из документа word 2010 связанные объекты. Все понятно, доступно и наглядно. А если какой-либо информации по редактору вам все-таки не хватает, оставляйте пожелание в соответствующем разделе. На портале о Microsoft Office Word вы узнаете про: как удалить номер со станицы в.