Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.08.2011, 13:57   #1
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
Вопрос Word - как скопировать код (формулу) поля, НЕ значение?

Привет!
Как скопировать код (формулу) поля, который отображается в режиме "коды полей" (Shift+F9)?
Текст копируется, но при вставке в другую программу получается значение поля.
Установка флажка "Печать кодов полей вместо их значений" не помогает.

Вопрос возник отсюда: http://programmersforum.ru/showthread.php?t=162052 , там я ввел код вручную.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 01.08.2011, 14:11   #2
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Во, нашел: http://word.tips.net/T003844_Copying...eld_Codes.html

Правда, макрос недоделан: работает только с простыми одиночными полями. Не работает со вложенными, как у меня, или если выделение содержит несколько простых полей.
Также требуется ввести в проект форму хотя бы с одним контролом, или установить Reference на Microsoft Forms 2.0 Object Library, иначе компилятор ругается на DataObject.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 01.08.2011, 15:04   #3
Aent
Форумчанин
 
Аватар для Aent
 
Регистрация: 17.07.2009
Сообщений: 519
По умолчанию

Я, обычно, использую такой код для случая вложенных полей
Код:
Debug.Print "{" & Replace(Replace(Selection.Fields(1).Code.Text, Chr(19), "{"), Chr(21), "}") & "}"
При желании, можно, конечно, и сразу забирать в Clipboard.
Aent вне форума Ответить с цитированием
Старый 01.08.2011, 18:43   #4
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,039
По умолчанию

не пойму, для чего это Вам может пригодиться???
Ципихович Эндрю вне форума Ответить с цитированием
Старый 01.08.2011, 19:37   #5
Aent
Форумчанин
 
Аватар для Aent
 
Регистрация: 17.07.2009
Сообщений: 519
По умолчанию

Цитата:
не пойму, для чего это Вам может пригодиться???
Исключительно, для публикации сложных примеров с кодами полей на форумах по
Word.

Последний раз редактировалось Aent; 01.08.2011 в 19:41.
Aent вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как скопировать код программы из редактора Visual Basic в документ Word. GoreProgrammist Microsoft Office Word 1 07.06.2011 13:21
Как скопировать формулу чтобы не изменились значения в ячейках _Alias_ Microsoft Office Excel 1 08.02.2011 17:22
Как скопировать лист Excel в Word? Диагностик Microsoft Office Excel 5 28.10.2010 23:05
Как написать из excel формулу в word Святой Дьявол Microsoft Office Excel 1 13.09.2010 22:07
как получить значение поля грид на основе значения другого lookUp поля malayka БД в Delphi 0 21.04.2010 19:06