powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Замена "прямых" кавычек
4 сообщений из 4, страница 1 из 1
Замена "прямых" кавычек
    #34297443
Фотография KiLLun
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
При формировании отчетов в Word из БД (Firebird 1.5) выводиться информация с прямыми кавычками. Как сделать чтобы "прямые" кавычки заменялись «парными».

Допустим в базе хранится ОАО "Рога и Копыта" , а при выводе в Word получать ОАО «Рога и копыта» .
...
Рейтинг: 0 / 0
Замена "прямых" кавычек
    #34300482
lena_####
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
KiLLun

Если в Параметрах автозамены в Word’е (Сервис > Параметры автозамены > Автоформат при вводе) в разделе "заменять при вводе" установлен флажок в пункте: "прямые" кавычки «парными», то вот такая процедура:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub mySub()
  With ActiveDocument.Content.Find
    .Text = """"
    .Replacement.Text = "«"
    .Wrap = wdFindContinue
    .Execute Replace:=wdReplaceAll
  End With
End Sub

должна дать желаемый эффект: замыкающие кавычки при этом Word автоматически заменит на ».
...
Рейтинг: 0 / 0
Замена "прямых" кавычек
    #34305719
Фотография KiLLun
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо
...
Рейтинг: 0 / 0
Замена "прямых" кавычек
    #34836633
LeCrunch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Решение с использованием спец.свойства AutoFormatAsYouTypeReplaceQuotes
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Замена "прямых" кавычек
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]