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

Допустим в базе хранится ОАО "Рога и Копыта" , а при выводе в Word получать ОАО «Рога и копыта» .
...
Рейтинг: 0 / 0
01.02.2007, 21:27:19
    #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
05.02.2007, 11:06:17
    #34305719
KiLLun
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена "прямых" кавычек
спасибо
...
Рейтинг: 0 / 0
29.09.2007, 21:44:34
    #34836633
LeCrunch
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена "прямых" кавычек
Решение с использованием спец.свойства AutoFormatAsYouTypeReplaceQuotes
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Замена "прямых" кавычек / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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