Как использовать шестнадцатеричный код в VBA Excel

Использование шестнадцатеричной системы счисления упрощает понимание чисел, используемых некоторыми объектами или свойствами VBA. Одним из таких свойств является цвет. Например, запись с основанием 10 «65025» не раскрывает структуру числа из трех частей, но использование шестнадцатеричной записи того же числа «&HFF00FF» раскрывает эту структуру:красный компонент цвета находится в двух частях. крайние правые символы, синий компонент находится в двух средних символах, а зеленый компонент — в пятом и шестом символах справа.

Шестнадцатеричная математика

Шаг 1

Перейдите на вкладку "Разработчик", чтобы открыть элементы управления для работы с VBA.

Шаг 2

Нажмите кнопку "Visual Basic", чтобы войти в среду программирования VBA.

Шаг 3

Вставьте следующую программу в окно в центре экрана. Эта программа использует шестнадцатеричный символ VBA "&H" для определения двух переменных, "a" и "b". Переменная "x" содержит сумму этих двух чисел, а инструкция "MsgBox" отображает нешестнадцатеричные представления "a", "b" и "x".

Public Sub doHexMath() Dim x, a, b a =&H10 b =&HA x =a + b MsgBox a &" plus " &b &" equals " &x End Sub

Шаг 4

Щелкните любой из операторов программы, чтобы выбрать программу.

Шаг 5

Щелкните команду «Выполнить» в меню «Выполнить». Excel отобразит сообщение «16 плюс 10 равно 26». В шестнадцатеричном формате "10" равно 16, а "A" равно 10.

Установить цвета

Шаг 1

Перейдите на вкладку «Разработчик», затем нажмите кнопку «Visual Basic» на панели «Код». Это действие вызовет среду программирования VBA.

Шаг 2

Вставьте следующую программу в появившееся окно программирования. Эта программа использует шестнадцатеричное представление для назначения цвета фона текущей выбранной ячейке в рабочей книге. Это обозначение появляется в присвоении переменных «красный», «зеленый» и «синий». Оператор «ActiveCell» также использует шестнадцатеричное представление и добавляет компоненты «красный», «зеленый» и «синий» вместе, чтобы получить число в формате, необходимом для установки цветов в Excel. Обратите внимание, что только «красная» переменная не равна нулю. Это означает, что цвет, который вы увидите, будет чисто красным.

Public Sub colorCell() Тусклый синий, зеленый, красный красный =&HFF зеленый =&H0 синий =&H0 ActiveCell.Interior.Color =синий * &HFF00 + зеленый * &HFF + красный End Sub

Шаг 3

Щелкните любой оператор в программе, чтобы выбрать программу для выполнения.

Шаг 4

Щелкните команду «Выполнить» в меню «Выполнить», чтобы запустить программу.

Шаг 5

Щелкните значок «Excel» на панели задач Windows, чтобы вернуться в Excel. Обратите внимание, что текущая ячейка окрашена в красный цвет, указанный вами на шаге 2.