Неизменяемые панели инструментов (Microsoft Word)
Если вы используете Word в учебной среде или на группе компьютеров, используемых многими разными людьми, вам может потребоваться способ убедиться, что панели инструментов всегда возвращаются в состояние по умолчанию. Например, если один пользователь переставляет панели инструментов, вы можете захотеть вернуть их в состояние по умолчанию, прежде чем следующий пользователь запустит программу.
Есть несколько способов справиться с этой ситуацией. Возможно, самый простой подход — просто сделать файл шаблона Normal.dot доступным только для чтения. Поскольку настройки панели инструментов хранятся в шаблоне, это поможет для многих панелей инструментов. Однако, если вы используете другой шаблон, возможно, что панели инструментов будут изменены при использовании этих шаблонов. Кроме того, это не сработает, если вы хотите разрешить другие изменения в шаблоне.
Другое решение — создать макрос, который вернет ваши панели инструментов в состояние по умолчанию. Это довольно простой макрос для создания. (Если вы обучаете людей программированию в Word, вы можете даже сделать макрос предметом назначения класса.) Следующий макрос может быть сохранен в вашем шаблоне, и, поскольку он запускается каждый раз при открытии документа , он вернет ваши панели инструментов в состояние по умолчанию:
Sub AutoOpen For Each cb In CommandBars cb.Reset Next End Sub
Если вам нужен больший контроль над панелями инструментов, в том числе переустановка их месторасположения, вы можете использовать макрос примерно такого типа:
Private Sub Document_New() CommandBars("Formatting").Protection = msoBarNoCustomize + \ msoBarNoChangeVisible + msoBarNoMove End Sub
Этот макрос следует поместить в модуль ThisDocument файла Normal.dot.
Этот конкретный пример защищает только панель инструментов форматирования, но вы можете быстро адаптировать ее к другим панелям инструментов, которые хотите защитить.
_Примечание: _
Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера]
.
WordTips — ваш источник экономичного обучения работе с Microsoft Word.
(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1335) относится к Microsoft Word 97, 2000, 2002 и 2003.