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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 28.02.2010, 16:07   #1
Temofey
Новичок
Джуниор
 
Регистрация: 28.02.2010
Сообщений: 4
По умолчанию Подсказка к тексту в word 2003?

Всем привет! Ребята, выручите плз. Все на самом деле очень просто, но походу ворд этого не умеет или я тупой! В общем, требуется следующее: нужно сделать подсказку к тексту. Подсказка тоже должна быть текстовой, т.е. никаких примочек со всплывающими окнами и пр. не нужно. Просто текст подсказки должен быть виден на экране, но не выводится на печать! Т.е. типа как у таблицы сделать невидимую границу. На экране она приобретает серый цвет и не выводится на печать. Нужно сделать тоже самое, только с текстом. Вариант сделать скрытый текст, а потом в параметрах вида поставить галочку, чтобы было видно скрытый текст и соответвенно убрать галочку с печати скрытого текста не катит! Потому что предполагается использовать эту подсказку на многих компьютерах! А настройки сохраняются только для одного компьютера. В общем всю голову уже сломал, как сделать такую простецкую вещь.

Последний раз редактировалось Temofey; 28.02.2010 в 16:10.
Temofey вне форума Ответить с цитированием
Старый 28.02.2010, 18:55   #2
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Макросы использовать можно?
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 28.02.2010, 19:33   #3
Temofey
Новичок
Джуниор
 
Регистрация: 28.02.2010
Сообщений: 4
По умолчанию

Цитата:
Сообщение от viter.alex Посмотреть сообщение
Макросы использовать можно?
если больше вариантов нет, то можно! Скажите код, пожалуйста.
Temofey вне форума Ответить с цитированием
Старый 28.02.2010, 20:01   #4
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Всего-то десяток строк:
Код:
Option Explicit

Dim bPrintHiddenText As Boolean

Sub AutoOpen()
  'При открытии документа показываем скрытый текст, запоминаем состояние печати скрытого текста _
  и запрещаем печать скрытого текста
  ActiveWindow.View.ShowHiddenText = True
  bPrintHiddenText = Options.PrintHiddenText
  Options.PrintHiddenText = False
End Sub

Sub AutoClose()
  'При закрытии документа восстанавливаем состояние печати скрытого текста
  Options.PrintHiddenText = bPrintHiddenText
End Sub
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 28.02.2010, 22:51   #5
Вождь
Форумчанин
 
Аватар для Вождь
 
Регистрация: 29.09.2008
Сообщений: 378
По умолчанию

Тоже можно сделать, используя «Надпись» с отключением вывода на печать графических объектов.
Макросы на заказ и готовый пакет - http://mtdmacro.ru/
Вождь вне форума Ответить с цитированием
Старый 01.03.2010, 03:07   #6
Temofey
Новичок
Джуниор
 
Регистрация: 28.02.2010
Сообщений: 4
По умолчанию

за код большое спасибо!

Цитата:
Тоже можно сделать, используя «Надпись» с отключением вывода на печать графических объектов.
не пойдет, т.к. параметры документа сохраняются только на том компе, на котором открыт документ. На другом компе придется делать тоже самое, а так не надо!
Temofey вне форума Ответить с цитированием
Старый 01.03.2010, 08:29   #7
Вождь
Форумчанин
 
Аватар для Вождь
 
Регистрация: 29.09.2008
Сообщений: 378
По умолчанию

Цитата:
Сообщение от Temofey Посмотреть сообщение
не пойдет...
Имелся ввиду предложенный макрос и использование Options.PrintDrawingObjects вместо Options.PrintHiddenText.
Макросы на заказ и готовый пакет - http://mtdmacro.ru/
Вождь вне форума Ответить с цитированием
Старый 01.03.2010, 12:00   #8
Temofey
Новичок
Джуниор
 
Регистрация: 28.02.2010
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Вождь Посмотреть сообщение
Имелся ввиду предложенный макрос и использование Options.PrintDrawingObjects вместо Options.PrintHiddenText.
ясно, я просто не понял. Необходимости в этом нет, лучше использовать первый макрос. Но все ровно спасибо! Буду знать на будущее!
Temofey вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Конвертировать формулы из [2007 Word 2007] в [2003 Word 2003] mswmd Microsoft Office Word 8 10.07.2017 17:06
Word 2003 и БОООЛЬШУЩИЙ документ villimilli Microsoft Office Word 5 06.04.2009 09:14
Формы Word 2003 shadowbeast Microsoft Office Word 3 10.03.2009 16:42
Символ абзаца Word 2003 dreack Microsoft Office Word 5 01.03.2009 14:17
Проблема office 2003 word Savierka Microsoft Office Word 14 05.04.2008 16:58