Изменение кнопок панели инструментов с помощью VBA (Microsoft Word)
На панели инструментов есть определенные кнопки, которые при нажатии меняют внешний вид. Например, если вы нажмете на инструмент «Полужирный», инструмент приобретет другой вид, как если бы он был нажат. Это делается в Word с помощью двух разных графических кнопок. Первый — это «невыбранный» вид, а второй отображается при нажатии кнопки.
Вы можете использовать аналогичный прием с настраиваемыми кнопками панели инструментов. В качестве примера того, как это может работать, предположим, что у вас есть панель инструментов, которую вы часто используете. Вы назвали эту панель инструментов «сэмплер». Вы хотите, чтобы эта панель инструментов отображалась при нажатии кнопки на другой панели инструментов.
Во-первых, вам нужно создать новую панель инструментов, которая будет содержать единственную кнопку, которая переключает панель инструментов «сэмплера». В этом примере новая панель инструментов будет называться «Switcher». Следующий макрос VBA может быть назначен кнопке на панели инструментов переключателя:
Sub SwitchTools() ' First check if the toolbar is shown or hidden If CommandBars("sampler").Visible Then ' Hide the toolbar and change the button image to "normal" CommandBars("sampler").Visible = False CommandBars("switcher").Controls(1).State. = msoButtonUp Else ' Show the button and change the button image to "selected" CommandBars("sampler").Visible = True CommandBars("switcher").Controls(1).State = msoButtonDown End If End Sub
Этот макрос переключает состояние кнопки (используя msoButtonUp и msoButtonDown), чтобы придать ей желаемый вид.
_Примечание: _
Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера]
.
WordTips — ваш источник экономичного обучения работе с Microsoft Word.
(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1122) относится к Microsoft Word 97, 2000, 2002 и 2003.