Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Замена экселевских (" ") кавычек на типографские (« ») - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Замена экселевских (" ") кавычек на типографские (« »)
Лорик Дата: Суббота, 28.03.2015, 16:21 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 109
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Доброго всем дня!
Нет ли у кого решения, как заменить в файле экселевские кавычки (" ") на типографские (« »).
На просторах ИНЕТА нашла несколько макросов, но они почему-то не работают у меня.
Нашла еще формулу массива
Код
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A1;МИН((ЕСЛИ(ПСТР(A1;СТРОКА($1:$99);1)="""";СТРОКА($1:$99))));1;"«");НАИМЕНЬШИЙ((ЕСЛИ(ПСТР(A1;СТРОКА($1:$99);1)="""";СТРОКА($1:$99)));2);1;"»")

Но она работает только если текст выглядит к примеру:
1. ООО "Спутник".
2. Наш комбинат "Заря" расположен на краю города.
В случае если, кавычки повторяются в тексте несколько раз (ООО "Прометей" филиал ОАО "Заря") формула не работает.
Варианты использования автозамены, и введения кавычек при помощи кода (Alt 0171 (0187)) не подходят, так как информация собирается из разных файлов (разных пользователей), и замену кавычек нужно применить в Сводной таблице.


Сообщение отредактировал Лорик - Суббота, 28.03.2015, 16:38
 
Ответить
СообщениеДоброго всем дня!
Нет ли у кого решения, как заменить в файле экселевские кавычки (" ") на типографские (« »).
На просторах ИНЕТА нашла несколько макросов, но они почему-то не работают у меня.
Нашла еще формулу массива
Код
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A1;МИН((ЕСЛИ(ПСТР(A1;СТРОКА($1:$99);1)="""";СТРОКА($1:$99))));1;"«");НАИМЕНЬШИЙ((ЕСЛИ(ПСТР(A1;СТРОКА($1:$99);1)="""";СТРОКА($1:$99)));2);1;"»")

Но она работает только если текст выглядит к примеру:
1. ООО "Спутник".
2. Наш комбинат "Заря" расположен на краю города.
В случае если, кавычки повторяются в тексте несколько раз (ООО "Прометей" филиал ОАО "Заря") формула не работает.
Варианты использования автозамены, и введения кавычек при помощи кода (Alt 0171 (0187)) не подходят, так как информация собирается из разных файлов (разных пользователей), и замену кавычек нужно применить в Сводной таблице.

Автор - Лорик
Дата добавления - 28.03.2015 в 16:21
Pelena Дата: Суббота, 28.03.2015, 16:38 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19508
Репутация: 4620 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Попробуйте такую формулу
Код
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(" "&A1&" ";" """;" «");""" ";"» "))

Если не получится, прикладывайте файл с примером


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Попробуйте такую формулу
Код
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(" "&A1&" ";" """;" «");""" ";"» "))

Если не получится, прикладывайте файл с примером

Автор - Pelena
Дата добавления - 28.03.2015 в 16:38
Лорик Дата: Суббота, 28.03.2015, 16:46 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 109
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Попробуйте такую формулу

Pelena, огромное Вам спасибо, все получилось. Не ожидала такого быстрого ответа. Еще раз благодарю.
 
Ответить
Сообщение
Попробуйте такую формулу

Pelena, огромное Вам спасибо, все получилось. Не ожидала такого быстрого ответа. Еще раз благодарю.

Автор - Лорик
Дата добавления - 28.03.2015 в 16:46
VEKTORVSFREEMAN Дата: Суббота, 28.03.2015, 16:56 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 772
Репутация: 130 ±
Замечаний: 0% ±

MS Office Excel 2010
Лорик, здравствуйте!
как вриант
Код
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;" """;" «");""" ";"» ");"""";"»")

работает с
ООО "Спутник";
Наш комбинат "Заря" расположен на краю города;
ООО "Прометей" филиал ОАО "Заря"
[p.s.]Единственное условие, что-бы текст НЕ начинался с кавычек "[/p.s.]


"Опыт - это то, что получаешь, не получив того, что хотел"


Сообщение отредактировал VEKTORVSFREEMAN - Суббота, 28.03.2015, 17:05
 
Ответить
СообщениеЛорик, здравствуйте!
как вриант
Код
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;" """;" «");""" ";"» ");"""";"»")

работает с
ООО "Спутник";
Наш комбинат "Заря" расположен на краю города;
ООО "Прометей" филиал ОАО "Заря"
[p.s.]Единственное условие, что-бы текст НЕ начинался с кавычек "[/p.s.]

Автор - VEKTORVSFREEMAN
Дата добавления - 28.03.2015 в 16:56
_Boroda_ Дата: Суббота, 28.03.2015, 16:57 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16880
Репутация: 6593 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Еще похожий, но не совсем, вариант. Начинаться и заканчиваться, как и у Лены, с кавычки может.
Код
=ПСТР(ПОДСТАВИТЬ(" "&ПОДСТАВИТЬ(A1;"""";"»");" »";" «");2;999)

Кстати, СЖПРОБЕЛЫ может изменить текст. Откуда мы знаем, может, там было в середине текста два пробела и так и нужно оставить?
К сообщению приложен файл: 56565487.xlsx (8.2 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеЕще похожий, но не совсем, вариант. Начинаться и заканчиваться, как и у Лены, с кавычки может.
Код
=ПСТР(ПОДСТАВИТЬ(" "&ПОДСТАВИТЬ(A1;"""";"»");" »";" «");2;999)

Кстати, СЖПРОБЕЛЫ может изменить текст. Откуда мы знаем, может, там было в середине текста два пробела и так и нужно оставить?

Автор - _Boroda_
Дата добавления - 28.03.2015 в 16:57
TimSha Дата: Суббота, 28.03.2015, 16:57 | Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 627
Репутация: 94 ±
Замечаний: 0% ±

Excel 2013 Pro +
Спасибо, Лена!
Но - маленький доворот, чтобы и конечные в предложениях обрабатывались. Как вариант для - Пришла "Волна" - отворяй "Ворота" для "Ворота"!.. ;)
Код
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(" "&A3&" ";" """;" «");"""";"»"))  


"Ctrl+S" - достойное завершение ваших гениальных мыслей!.. ;)
 
Ответить
СообщениеСпасибо, Лена!
Но - маленький доворот, чтобы и конечные в предложениях обрабатывались. Как вариант для - Пришла "Волна" - отворяй "Ворота" для "Ворота"!.. ;)
Код
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(" "&A3&" ";" """;" «");"""";"»"))  

Автор - TimSha
Дата добавления - 28.03.2015 в 16:57
stroika Дата: Суббота, 03.11.2018, 21:39 | Сообщение № 7
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 116
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, Вопрос глупый, но, А нельзя эту формулу внести как-то в Автозамену?
 
Ответить
Сообщение_Boroda_, Вопрос глупый, но, А нельзя эту формулу внести как-то в Автозамену?

Автор - stroika
Дата добавления - 03.11.2018 в 21:39
_Boroda_ Дата: Воскресенье, 04.11.2018, 01:15 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 16880
Репутация: 6593 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Формулу? Вряд ли. Макрос для автозамены можно написать. Или в стандартную автозамену (Файл - параметры - Правописание - параметры автозамены - автозамена) ввести какие-то определенные удобные Вам буквосочетания для « и для »


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеФормулу? Вряд ли. Макрос для автозамены можно написать. Или в стандартную автозамену (Файл - параметры - Правописание - параметры автозамены - автозамена) ввести какие-то определенные удобные Вам буквосочетания для « и для »

Автор - _Boroda_
Дата добавления - 04.11.2018 в 01:15
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!