Тема: Замена во всех словах, подчеркнутых как неправильно написанные
Подскажите, как заменить первую маленькую букву на большую во всех словах, которые word помечает как написанные с ошибкой.
Спасибо.
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Форум Microsoft Word » Настройка и Форматирование » Замена во всех словах, подчеркнутых как неправильно написанные
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Подскажите, как заменить первую маленькую букву на большую во всех словах, которые word помечает как написанные с ошибкой.
Спасибо.
tetris1981
Для перехода по "подчеркнутым" словам можно воспользоваться Selection.GoToNext(wdGoToProofreadingError).
Правда, оператор как-то непонятно работает с Range и иногда выделяет строку вместо слова.
Навскидку получилась такая кривенькая процедура, работающая с выделенным текстом:
With Selection
endd = .End
f0 = .Range
.Collapse
Do While .End <= endd And f0 <> .Range
.GoToNext(wdGoToProofreadingError).Select
a = Trim(.Text): If Len(a) > 0 Then Mid(a, 1, 1) = UCase(Mid(a, 1, 1)): .Text = a
f0 = .Range
.Collapse 0
Loop
End With
Немного дополню. Изменить регистр можно так:
If Len(Trim(.Text)) > 0 Then
.Text = StrConv(.Text, vbProperCase)
End If
вместо
a = Trim(.Text): If Len(a) > 0 Then Mid(a, 1, 1) = UCase(Mid(a, 1, 1)): .Text = a
супер! всем спасибо
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Замена во всех словах, подчеркнутых как неправильно написанные
В своей деятельности вы наверняка пользуетесь таким мощным текстовым редактором, каким является Microsoft Word. На портале о Microsoft Office Word вы узнаете про: вкладка меню для word. И, конечно, если работа с текстами в Ворде составляет значительную долю вашего труда, вам приходила в голову мысль о том, как оптимизировать ее. Наш сайт о Microsoft Office Word даст ответ про: антоним к слову злиться.
Этот вопрос является приоритетным на форуме Ворд Экспер, посвященном работе с различными версиями программы. На портале о Microsoft Office Word вы узнаете про: как сделать текст по ширине страницы. Форум, прежде всего, ориентирован на написание разнообразных макросов и шаблонов для Ворда. Тут есть готовые решения той или иной задачи, разбираются различные пути. На портале о Microsoft Office Word вы узнаете про: word выравнивание. Вы найдете все о макросах – от самых азов для новичков, до тонкостей, которыми делятся друг с другом опытные пользователи. Наш сайт о Microsoft Office Word даст ответ про: какой антоним будет слову брегданс. В одном из подразделов форума вы можете оставить описание своей проблемы и сделать заказ на разработку макроса или шаблона. На портале о Microsoft Office Word вы узнаете про: пи на 4 в ворде.
Конечно, автоматизация, не единственная тема форума. Здесь обсуждаются настройки различных версий Ворда и любые другие вопросы, связанные с самой программой, редактированием, написанием, рецензированием текстов в Ворде. На портале о Microsoft Office Word вы узнаете про: удалить сноску word 2010. Самым часто возникающим проблемам посвящен отдельный раздел, который стоит посетить в первую очередь. На портале о Microsoft Office Word вы узнаете про: нумерация страниц в ворде 2007 убрать с титульного.
Если у вас есть чем поделиться с другими пользователями Ворда, вы можете выкладывать свои решения в соответствующих подразделах. На портале о Microsoft Office Word вы узнаете про: как вставить номер страницы в microsoft office 2010.