Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как определить цифровые значения цветов в палитре Excel 2010 - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как определить цифровые значения цветов в палитре Excel 2010 (Макросы/Sub)
Как определить цифровые значения цветов в палитре Excel 2010
1avgur1 Дата: Среда, 15.04.2015, 17:13 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
На листе экселя есть таблица. Ее колонки были вручную размечены цветами из стандартной палитры.
Был написан макрос, который добавляет в эту таблицу строки. Надо его докрутить таким образом, чтобы он окрашивал вставляемые ячейки в цвета соответствующего столбца. Я так понимаю, что это делается командой
Range (...).Interior.ColorIndex = цвет
Вопрос: как посмотреть или где узнать цифровое значение цветов из стандартной палитры, чтобы вставить в команду?
 
Ответить
СообщениеНа листе экселя есть таблица. Ее колонки были вручную размечены цветами из стандартной палитры.
Был написан макрос, который добавляет в эту таблицу строки. Надо его докрутить таким образом, чтобы он окрашивал вставляемые ячейки в цвета соответствующего столбца. Я так понимаю, что это делается командой
Range (...).Interior.ColorIndex = цвет
Вопрос: как посмотреть или где узнать цифровое значение цветов из стандартной палитры, чтобы вставить в команду?
Автор - 1avgur1
Дата добавления - 15.04.2015 в 17:13
nilem Дата: Среда, 15.04.2015, 17:28 | Сообщение № 2
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
типа
[vba]
Код
Msgbox range("A1").Interior.Color
[/vba]
даст номер цвета

а еще ColorIndex можно посмотреть в файлике
К сообщению приложен файл: 2533490.jpg (37.2 Kb)

Яндекс.Деньги 4100159601573

Сообщение отредактировал nilem - Среда, 15.04.2015, 17:29
 
Ответить
Сообщениетипа
[vba]
Код
Msgbox range("A1").Interior.Color
[/vba]
даст номер цвета

а еще ColorIndex можно посмотреть в файлике
Автор - nilem
Дата добавления - 15.04.2015 в 17:28
KSV Дата: Среда, 15.04.2015, 17:32 | Сообщение № 3
Группа: Друзья
Ранг: Ветеран
Сообщений: 770
Репутация: 255 ±
Замечаний: 0% ±

Excel 2013
Если цвет будет браться из палитры, то да, Range (...).Interior.ColorIndex, а если нужно присвоить какой-то цвет, отсутствующий в палитре, то [vba]
Код
Range(...).Interior.Color = RGB(252, 252, 77)
[/vba]
Узнать цвета можно этими же свойствами - ColorIndex вернет индекс цвета в палитре, а Color - цвет в RGB

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333
 
Ответить
СообщениеЕсли цвет будет браться из палитры, то да, Range (...).Interior.ColorIndex, а если нужно присвоить какой-то цвет, отсутствующий в палитре, то [vba]
Код
Range(...).Interior.Color = RGB(252, 252, 77)
[/vba]
Узнать цвета можно этими же свойствами - ColorIndex вернет индекс цвета в палитре, а Color - цвет в RGB
Автор - KSV
Дата добавления - 15.04.2015 в 17:32
slAvIk159 Дата: Среда, 15.04.2015, 17:40 | Сообщение № 4
Группа: Проверенные
Ранг: Участник
Сообщений: 83
Репутация: 13 ±
Замечаний: 0% ±

Excel 2013
можна ещё с помощью моего файлика
заливаеш ячейки (с 1 по 20) в первой колонке, нажимаеш кнопку и будут тебе коды цветов
К сообщению приложен файл: 1avgur1.xlsm (19.4 Kb)


Сообщение отредактировал slAvIk159 - Среда, 15.04.2015, 17:41
 
Ответить
Сообщениеможна ещё с помощью моего файлика
заливаеш ячейки (с 1 по 20) в первой колонке, нажимаеш кнопку и будут тебе коды цветов
Автор - slAvIk159
Дата добавления - 15.04.2015 в 17:40
1avgur1 Дата: Среда, 15.04.2015, 17:46 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Исчерпывающе.
Всем спасибо за ответы
 
Ответить
СообщениеИсчерпывающе.
Всем спасибо за ответы
Автор - 1avgur1
Дата добавления - 15.04.2015 в 17:46
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как определить цифровые значения цветов в палитре Excel 2010 (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!