Тема: Замена на прописные
Подскажите пожалуйста, как сделать замену по всему документу текст, отмеченный через формат -> шрифт -> все прописные, обычными прописными? Заранее благодарна.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
ivolga-07 пишет:
Подскажите пожалуйста, как сделать замену по всему документу текст, отмеченный через формат -> шрифт -> все прописные, обычными прописными? Заранее благодарна.
Что Вы имеете в виду под "текст, отмеченный через формат"?
Замена должна быть произведена для текста определенного формата?
Выложите, пожалуйста, пример.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Re: Замена на прописные
В закладке шрифт стоит галочка все прописные. При преобразовании текста эта галочка автоматически снимается и текст становится строчными буквами.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
ivolga-07 пишет:
В закладке шрифт стоит галочка все прописные. При преобразовании текста эта галочка автоматически снимается и текст становится строчными буквами.
После какого преобразования описанная Вами галочка снимается?
В чем заключается преобразование?
Опишите, пожалуйста, максимально подробно, как Вы выполняете преобразование?
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Re: Замена на прописные
Применяется "очистить формат" через закладку стили и форматирование. Это необходимо для последующей вставки в программу верстки Corel Venrura.
Re: Замена на прописные
1. Ctrl+A - выделить всё
2. В "Заменить" выставить в нижнем поле (на что заменять) формат "все прописные" и нажать "Заменить все"
тектовые поля оставить пустые
все заменится
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
ivolga-07 пишет:
Применяется "очистить формат" через закладку стили и форматирование. Это необходимо для последующей вставки в программу верстки Corel Venrura.
Если Вы очищаете формат, то очищаете и видоизменение Все прописные. Это тоже форматирование.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
Правильно ли я понял, что Вы хотите отменить все форматирование, но оставить только форматирование Все прописные?
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Re: Замена на прописные
Хотелось бы, чтобы перед началом форматирования я бы могла преобразовать текст, отмеченный галочкой "все прописные" в обычный текст, набранный верхним регистром, чтобы впоследствии после форматирования он оставался прописными буквами.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
ivolga-07 пишет:
Хотелось бы, чтобы перед началом форматирования я бы могла преобразовать текст, отмеченный галочкой "все прописные" в обычный текст, набранный верхним регистром, чтобы впоследствии после форматирования он оставался прописными буквами.
Понятно.
К сожалению, это - довольно трудно, стандартными методами Word такую задачу, кажется, не решить.
Но, в принципе, можно было бы написать макрос, меняющий каждую букву на соответствующую прописную.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
Попробуйте сделать так:
1) Установить курсор на строку с форматированием Все прописные.
2) Главная - группа Редактирование - Выделить - Выделить текст, имеющий такой же формат.
Должен выделиться только тот текст, который имеет форматирование Все прописные.
3) Трижды нажмите стандартное сочетание клавиш Shift+F3.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
- Alex_Gur
- Модератор
- Неактивен
Re: Замена на прописные
Благодаря эксперту Вождь, удалось написать макрос для решения этой задачи:
Sub Macro1()
Application.Run MacroName:="SelectSimilarFormatting"
Selection.Font.Color = 1
Application.Run MacroName:="ChangeCase"
Application.Run MacroName:="SelectSimilarFormatting"
Application.Run MacroName:="ChangeCase"
Application.Run MacroName:="SelectSimilarFormatting"
Application.Run MacroName:="ChangeCase"
Application.Run MacroName:="SelectSimilarFormatting"
Selection.Font.ColorIndex = wdAuto
Selection.MoveRight Unit:=wdCharacter, Count:=1
End SubСложность заключается в том, что команда Выделить текст, имеющий такой же формат не отображается в макрорекордере и должна выполняться, как внутренняя команда приложения.
После первого применения данного макроса выделение снимается, как и форматирование. Поэтому приходится задавать вспомогательное форматирование черным цветом, а затем снимать его.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.