Список кодів індексу кольорів VBA
При використанні VBA для кодування Colorindex (або кольору фону) клітинки корисно знати, яке ціле число буде дорівнювати якому кольору. Нижче наведено довідкове зображення, яке показує колір та перераховує відповідний колірний індекс. він же Колірна палітра VBA
Ось код, щоб створити його для себе, або просто додайте цю сторінку в закладки:
| 123456789101112131415 | Додатковий колірRef ()Dim x як ціле числоДля х = 1 до 56Якщо x <ТодіКлітинки (x, 1). Внутрішній. Індекс кольору = xКлітинки (x, 2) = xІнакшеКлітинки (x - 28, 3) .Внутрішній. Колірний індекс = xКлітинки (x - 28, 4) = xЗакінчити ЯкщоДалі xEnd Sub |
Приклади VBA ColorIndex
Встановіть колір фону клітинки
| 1 | Діапазон ("A1"). Інтер'єр. Індекс кольору = 6 |
Встановіть колір шрифту комірки
| 1 | Діапазон ("A1"). Font.ColorIndex = 5 |
Встановити колір меж клітинок
| 1 | Діапазон ("A1"). Межі.Колір Індекс = 5 |
Отримати колір фону клітинкиIndex
| 123 | Dim col як ціле числоcol = Діапазон ("A1"). Інтер'єр.Колір Індекс |
Встановіть колір фону клітинки на колір іншої клітини
| 1 | Діапазон ("A1"). Interior.ColorIndex = Діапазон ("B1"). Interior.ColorIndex |
Властивість кольору VBA
Замість використання властивості ColorIndex Excel / VBA можна використовувати властивість Color. Властивість Color приймає два типи введення:
- vbColor
- Кольори RGB
Нижче ми обговоримо це:
Колір VB
VB Color - найпростіший спосіб встановлення кольорів у VBA. Однак він також є найменш гнучким. Щоб встановити колірний код за допомогою vbColor, скористайтесь таблицею нижче:
Однак, як видно з таблиці, ваші можливості вкрай обмежені.
Встановіть колір фону клітинки
| 1 | Діапазон ("A1"). Інтер'єр. Колір = vbЖовтий |
Встановіть колір шрифту комірки
| 1 | Діапазон ("A1"). Font.Color = vbBlue |
Встановити колір меж клітинок
| 1 | Діапазон ("A1"). Межі.Колір = vbRed |
Встановіть колір фону клітинки на колір іншої клітини
| 1 | Діапазон ("A1"). Інтер'єр. Колір = Діапазон ("B1"). Інтер'єр. Колір |
Кольори RGB
RGB означає червоний зелений синій. Це три основні кольори, які можна поєднати для отримання будь -якого іншого кольору. При введенні кольорів як RGB введіть значення від 0 до 255 для кожного коду кольору.
Ось приклад:
| 1 | Діапазон ("A1"). Інтер'єр. Колір = RGB (255,255,0) |
Вище ми встановили червоний = 255 (максимальне значення), зелений = 255 (максимальне значення) та синій = 0 (мінімальне значення). Це встановлює колір фону клітинки на жовтий.
Замість цього ми можемо встановити колір шрифту клітинки на фіолетовий:
| 1 | Діапазон ("A1"). Інтер'єр. Колір = RGB (128,0,128) |
Існує безліч онлайн -інструментів для пошуку коду RGB для потрібного кольору (ось один).
Список кодів ColorIndex та кольори RGB у Access VBA
Access використовує форми для відображення даних. Ви можете використовувати коди ColorIndex для програмного зміни кольору фону та кольору переднього плану об’єктів у ваших формах Access.
| 12345 | Приватний саб cmdSave_Click ()'змінити колір фону кнопки збереження при збереженні запису.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenEnd Sub |
