|
Доброго вам дня дорогие знатоки! Делаю свои первые шаги в VBA. Записываю макрос и потом привязываю его к кнопке. Шрифты на названиях кнопок меняются поцветам и размерам, но вот цвет самой области кнопки почему-то нет. Есть ли возможность менять заливку кнопки? Заранее спасибо! С уважением — Самир, Баку |
|
|
Юрий М  Модератор Сообщений: 60389 Контакты см. в профиле |
Если будете использовать кнопки из панели инструментов «Элементы управления», то кнопки можно легко покрасить. |
|
{quote}{login=Юрий М}{date=08.07.2010 01:12}{thema=}{post}Если будете использовать кнопки из панели инструментов «Элементы управления», то кнопки можно легко покрасить.{/post}{/quote} В том то и дело что я именно Элементы управления использую, но там нигде про заливки не упоминается. Форматировать можно только шрифт. |
|
|
Юрий М Модератор Сообщений: 60389 Контакты см. в профиле |
Подозреваю, что Вы используете кнопки из панели инструментов «Формы». Там, действительно, можно только со шрифтом поиграться. А в тех, о которых я писал выше — можете менять и цвет самой кнопки. |
|
The_Prist  Пользователь Сообщений: 13997 Профессиональная разработка приложений для MS Office |
Лучше используйте не элементы, а фигуры. Выбрали любую понравившуюся-Вставили_Правый щелчок мыши-Назначить макрос. А уж красить и вертеть эту фигуру потом можно как угодно…. Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы… |
|
{quote}{login=Юрий М}{date=08.07.2010 01:20}{thema=}{post}Подозреваю, что Вы используете кнопки из панели инструментов «Формы». Там, действительно, можно только со шрифтом поиграться. А в тех, о которых я писал выше — можете менять и цвет самой кнопки.{/post}{/quote} Ваши подозрения правильные С уважением — Самир, Баку |
|
Сейчас все понятно! Спасибо Юра гардаш! (гардаш — это означает брат) |
Юрий М Модератор Сообщений: 60389 Контакты см. в профиле |
И не отворачивайтесь от совета Prist — можно «кнопочки» любой формы нарисовать |
|
Guest Гость |
#8 08.07.2010 13:37:04 {quote}{login=The_Prist}{date=08.07.2010 01:27}{thema=}{post}Лучше используйте не элементы, а фигуры. Выбрали любую понравившуюся-Вставили_Правый щелчок мыши-Назначить макрос. А уж красить и вертеть эту фигуру потом можно как угодно….{/post}{/quote} Не сказать в лицо, но я уже здесь 6 месяцев и считаю что The_Prist это «The_Best» Конечно же можно через фигуры делать! Спасибо вам! вы меня не раз выручали!! |
В Excel, когда вы вставляете командную кнопку, цвет кнопки по умолчанию серый. Но иногда вам нужно изменить серый цвет на красивый, чтобы сделать рабочий лист более профессиональным. Сегодня я могу представить вам несколько быстрых приемов изменения цвета кнопки в Excel.
Измените цвет кнопки ActiveX Control с изменением свойств
Измените цвет кнопки управления ActiveX с кодом VBA
Измените цвет кнопки ActiveX Control с изменением свойств
Обычно в Excel есть кнопки двух типов: одна Контроль формы кнопка, а другой элемент управления ActiveX кнопка. Если кнопка является кнопкой управления формой, вы можете просто изменить ее цвет шрифта, но не меняйте цвет фона. Вы просто можете изменить цвет задней части кнопки ActiveX Control. Пожалуйста, сделайте так:
1. Вставьте элемент управления ActiveX кнопку, нажав Застройщик > ВставитьИ выберите Кнопка управления под Элементы управления ActiveX раздел, см. снимок экрана:
Внимание: Если Застройщик вкладка не отображается на ленте, вы можете нажать Файл > Опция > Настроить ленту, затем проверьте Застройщик на правой панели, чтобы отобразить Застройщик меню.
2. Затем перетащите мышь, чтобы нарисовать кнопку.
3. Затем нажмите кнопку и щелкните правой кнопкой мыши, выберите Объявления из контекстного меню, а во всплывающем Объявления диалоговое окно, нажмите Алфавитный Вкладка, а затем нажмите кнопку НазадЦвет выпадающий список, чтобы выбрать один понравившийся цвет, см. скриншоты:
4. Затем закройте диалоговое окно, и цвет вашей командной кнопки будет изменен следующим образом:
5. Наконец, брось Режим проектирования кликнув Застройщик > Режим проектирования чтобы кнопка использовалась нормально.
Измените цвет кнопки управления ActiveX с кодом VBA
Как мы видим, Excel предоставляет нам несколько цветов в диалоговом окне «Свойства». С помощью следующего простого кода VBA можно выбрать множество цветов.
1. Вставьте командную кнопку и щелкните правой кнопкой мыши, затем выберите Просмотреть код из контекстного меню см. снимок экрана:
2, Затем Окно Microsoft Visual Basic для приложений отобразится, см. снимок экрана:
3. А затем скопируйте и вставьте этот простой скрипт кода: CommandButton1.BackColor = 12713921 в окно между двумя кодами, см. снимок экрана:
Примечание: В приведенном выше кодовом сценарии CommandButton1 это название вашей кнопки, а номер 12713921 это MS-доступномер, они все переменные, вы можете изменить их по своему усмотрению.
4. Затем нажмите F5 нажмите кнопку для запуска этого кода, и цвет вашей кнопки сразу изменится.
Функции: Вы можете перейти на этот сайт: http://www.endprod.com/colors/ чтобы увидеть больше Номер доступа MS значения цвета, возможно, вы можете использовать сотни цветов. После открытия веб-сайта вам просто нужно выбрать цвет и скопировать соответствующий номер в MSAccess herder, а затем заменить указанный выше номер в скрипте кода.
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Комментарии (7)
Оценок пока нет. Оцените первым!
|
0 / 0 / 0 Регистрация: 23.04.2020 Сообщений: 7 |
|
|
1 |
|
|
Excel Смена цвета кнопки при нажатии26.04.2020, 18:16. Показов 9775. Ответов 3
Добрый день, помогите с такой задачей. Command botton должна менять цвет при нажатии(зеленый) и при повторном нажатии возвращаться обратно в серый, ну и при следующем- опять зеленый и т.д
__________________
0 |
|
pashulka 4129 / 2233 / 940 Регистрация: 01.12.2010 Сообщений: 4,624 |
||||
|
26.04.2020, 18:24 |
2 |
|||
|
Решение
2 |
Сообщение было отмечено aguagua как решение
|
0 / 0 / 0 Регистрация: 23.04.2020 Сообщений: 7 |
|
|
26.04.2020, 18:40 [ТС] |
3 |
|
я просто в шоке
0 |
так просто когда видишь готовое решение. Спасибо !|
Заблокирован |
||||
|
27.04.2020, 10:36 |
4 |
|||
|
РешениеВариант —
1 |
|
IT_Exp Эксперт 87844 / 49110 / 22898 Регистрация: 17.06.2006 Сообщений: 92,604 |
27.04.2020, 10:36 |
|
4 |
В Microsoft Excel, Word или PowerPoint вкладка «Разработчик» является дополнительной вкладкой, которая позволяет пользователям получать доступ к элементам управления формы и другим элементам управления типа программирования, таким как макросы, сопоставление, надстройки, шаблоны, защита и элементы управления, которые включают кнопки управления ActiveX. К кнопкам ActiveX относятся флажок, текстовое поле, метка, кнопка «Параметры», кнопка «Счетчик», поле со списком, кнопка «Команда» и т. д. Когда кнопка ActiveX выбрана, пользователи могут запрограммировать ее для запуска действия или изменения ее внешнего вида с помощью предлагаемой функции «Свойства». .
Выполните следующие действия, чтобы изменить цвет кнопок управления ActiveX в Microsoft Excel, Word или PowerPoint.
- Запустите Microsoft Excel, Word или PowerPoint.
- Щелкните вкладку Разработчик.
- Нажмите кнопку «Устаревшие инструменты» в разделе группы «Элементы управления».
- Выберите кнопку ActiveX в меню.
- Нажмите кнопку Свойства.
- Нажмите «Цвет фона» и выберите цвет из списка.
- Цвет изменится.
Мы используем Word в качестве примера, но процедура идентична:
Запустите Microsoft Word.
Щелкните вкладку «Разработчик» в строке меню.
Нажмите на Устаревшие инструменты кнопка в Элементы управления групповой раздел. Функция Legacy Tools позволяет пользователям вставлять кнопки Active X и элементы управления формами в свои документы.
Выберите кнопку Active X в меню. В этом уроке мы выбрали текстовое поле.
Затем щелкните Характеристики кнопка в Контроль группа. Кнопка «Свойства» позволяет пользователям просматривать и изменять свойства выбранного элемента управления.
Откроется диалоговое окно «Свойства», демонстрирующее свойства выбранной вами кнопки Active X.
Нажмите на НазадЦвет кнопка в диалоговом окне «Свойства»; вы увидите окно со списком цветов с двумя вкладками Система вкладка и Палитра вкладка
Выберите цвет из Система вкладка или Палитра вкладка
Цвет кнопки автоматически изменится на выбранный вами цвет.
В диалоговом окне «Свойства» вы также можете изменить цвет границы кнопки Active X; Нажмите Цвет границыи цвет кнопки Active X изменится на выбранный цвет.
Если вы ввели текст в текстовое поле Active X, вы можете изменить цвет текста.
В диалоговом окне «Свойства» щелкните передний цвет и выберите цвет из Система или Палитра вкладка
После того, как вы закончили изменять кнопку Active X; нажмите кнопку закрытия.
ПРОЧИТАЙТЕ: как добавлять и изменять элементы управления содержимым в Microsoft Word.
Как отобразить вкладку «Разработчик» в Excel, Word или PowerPoint
- Откройте Excel, Word или PowerPoint
- Нажмите «Файл»> «Параметры».
- Выберите «Настроить ленту» > «Настроить ленту» > «Главные вкладки».
- Проверьте Разработчик и выберите Сохранить.
- Перезапустите Ворд.
Что такое элементы управления ActiveX в Excel, Word или PowerPoint?
Элементы управления ActiveX — это небольшие стандартные блоки, которые создают приложения, работающие через Интернет через веб-браузеры. Обычно элементы управления ActiveX используются для командных кнопок, списков и диалоговых окон.
В чем разница между элементами управления ActiveX и Form?
Разница между элементами управления ActiveX и элементами управления формы заключается в том, что элементы управления ActiveX загружаются отдельно, а элементы управления формы встроены в Excel. Элементы управления форм намного проще, а элементы управления Active X более сложны.
Мы надеемся, что это руководство поможет вам понять, как изменить цвет кнопок ActiveX в Excel, Word или PowerPoint; если у вас есть вопросы по поводу урока, дайте нам знать в комментариях.
Элемент управления пользовательской формы CommandButton, используемый в VBA Excel для запуска процедур и макросов. Свойства кнопки, примеры кода с ней.
UserForm.CommandButton – это элемент управления пользовательской формы, предназначенный исключительно для запуска процедур и макросов VBA Excel.
Для запуска процедур и макросов обычно используется событие кнопки – Click.
Свойства элемента CommandButton
| Свойство | Описание |
|---|---|
| AutoSize | Автоподбор размера кнопки. True – размер автоматически подстраивается под длину введенной надписи (заголовка). False – размер элемента управления определяется свойствами Width и Height. |
| BackColor | Цвет элемента управления CommandButton. |
| Caption | Надпись (заголовок) – текст, отображаемый на кнопке. |
| ControlTipText | Текст всплывающей подсказки при наведении курсора на кнопку. |
| Enabled | Возможность взаимодействия пользователя с элементом управления CommandButton. True – взаимодействие включено, False – отключено (цвет надписи становится серым). |
| Font | Шрифт, начертание и размер текста надписи. |
| Height | Высота элемента управления. |
| Left | Расстояние от левого края внутренней границы пользовательской формы до левого края элемента управления. |
| Picture | Добавление изображения вместо текста заголовка или дополнительно к нему. |
| PicturePosition | Выравнивание изображения и текста на кнопке. |
| TabIndex | Определяет позицию элемента управления в очереди на получение фокуса при табуляции, вызываемой нажатием клавиш «Tab», «Enter». Отсчет начинается с 0. |
| Top | Расстояние от верхнего края внутренней границы пользовательской формы до верхнего края элемента управления. |
| Visible | Видимость элемента управления CommandButton. True – элемент отображается на пользовательской форме, False – скрыт. |
| Width | Ширина элемента управления. |
| WordWrap | Перенос текста заголовка на новую строку при достижении ее границы. True – перенос включен, False – перенос выключен. |
В таблице перечислены только основные, часто используемые свойства кнопки. Все доступные свойства отображены в окне Properties элемента управления CommandButton.
Пример кнопки с надписью и изображением
Примеры кода VBA Excel с кнопкой
Изначально для реализации примеров на пользовательскую форму UserForm1 добавлена кнопка CommandButton1.
Пример 1
Изменение цвета и надписи кнопки при наведении на нее курсора.
Условие примера 1
- Действия при загрузке формы: замена заголовка формы по умолчанию на «Пример 1», замена надписи кнопки по умолчанию на «Кнопка», запись цвета кнопки по умолчанию в переменную уровня модуля.
- Сделать, чтобы при наведении курсора на кнопку, она изменяла цвет на зеленый, а надпись «Кнопка» менялась на надпись «Нажми!»
- Добавление кода VBA Excel, который будет при удалении курсора с кнопки возвращать ей первоначальные настройки: цвет по умолчанию и надпись «Кнопка».
Решение примера 1
1. Объявляем в разделе Declarations модуля пользовательской формы (в самом начале модуля, до процедур) переменную myColor:
2. Загружаем пользовательскую форму с заданными параметрами:
|
Private Sub UserForm_Initialize() Me.Caption = «Пример 1» With CommandButton1 myColor = .BackColor .Caption = «Кнопка» End With End Sub |
3. Меняем цвет и надпись кнопки при наведении на нее курсора мыши:
|
Private Sub CommandButton1_MouseMove(ByVal _ Button As Integer, ByVal Shift As Integer, _ ByVal X As Single, ByVal Y As Single) With CommandButton1 .BackColor = vbGreen .Caption = «Нажми!» End With End Sub |
4. Возвращаем цвет и надпись кнопки при удалении с нее курсора мыши:
|
Private Sub UserForm_MouseMove(ByVal _ Button As Integer, ByVal Shift As Integer, _ ByVal X As Single, ByVal Y As Single) With CommandButton1 .BackColor = myColor .Caption = «Кнопка» End With End Sub |
Все процедуры размещаются в модуле пользовательской формы. Переменная myColor объявляется на уровне модуля, так как она используется в двух процедурах.
Пример 2
Запуск кода, размещенного внутри процедуры обработки события Click элемента управления CommandButton:
|
Private Sub CommandButton1_Click() MsgBox «Код внутри обработки события Click» End Sub |
Пример 3
Запуск внешней процедуры из процедуры обработки события Click элемента управления CommandButton.
Внешняя процедура, размещенная в стандартном модуле проекта VBA Excel:
|
Sub Test() MsgBox «Запуск внешней процедуры» End Sub |
Вызов внешней процедуры из кода обработки события Click
- с ключевым словом Call:
|
Private Sub CommandButton1_Click() Call Test End Sub |
- без ключевого слова Call:
|
Private Sub CommandButton1_Click() Test End Sub |
Строки вызова внешней процедуры с ключевым словом Call и без него – равнозначны. На ключевое слово Call можно ориентироваться как на подсказку, которая указывает на то, что эта строка вызывает внешнюю процедуру.