Поставете следната програма в прозореца в центъра на екрана. Тази програма използва шестнадесетичния символ на VBA, "&H", за да дефинира две променливи, "a" и "b". Променливата "x" държи сумата от тези две числа и операторът "MsgBox" показва не шестнадесетични представяния на "a", "b" и "х."
Public Sub doHexMath() Dim x, a, b a = &H10 b = &HA x = a + b MsgBox a & " plus " & b & " е равно " & x End Sub
Щракнете върху командата "Run" в менюто "Run". Excel ще покаже съобщението "16 плюс 10 е равно на 26." В шестнадесетичен формат "10" е равно на 16, а "A" е равно на 10.
Щракнете върху раздела „Разработчик“, след което щракнете върху бутона „Visual Basic“ в панела „Код“. Това действие ще изведе средата за програмиране VBA.
Поставете следната програма в прозореца за програмиране, който се показва. Тази програма използва шестнадесетична нотация, за да присвои цвят на фона на текущо избраната клетка в работната книга. Тази нотация се появява в присвояването на променливите „червено“, „зелено“ и „синьо“. Изявлението "ActiveCell" също използва шестнадесетична нотация и добавя "червените", "зелените" и "сините" компоненти заедно, за да се получи число във формата, необходим за задаване цветове в Excel. Забележете, че само "червената" променлива е различна от нула. Това означава, че цветът, който ще видите, ще бъде чисто червен.
Public Sub colorCell() Тъмно синьо, зелено, червено червено = &HFF зелено = &H0 синьо = &H0 ActiveCell. Интериор. Цвят = син * &HFF00 + зелен * &HFF + червен Краен суб
