Lipiți următorul program în fereastra din centrul ecranului. Acest program folosește simbolul de notație hexazecimală al VBA, „&H”, pentru a defini două variabile, „a” și „b”. Variabila „x” este valabilă suma acestor două numere, iar instrucțiunea „MsgBox” afișează reprezentările non-hexazecimale ale „a”, „b” și "X."
Public Sub doHexMath() Dim x, a, b a = &H10 b = &HA x = a + b MsgBox a & " plus " & b & " egal cu " & x End Sub
Faceți clic pe comanda „Run” din meniul „Run”. Excel va afișa mesajul „16 plus 10 este egal cu 26”. În hexazecimal, „10” este egal cu 16, iar „A” este egal cu 10.
Faceți clic pe fila „Dezvoltator”, apoi faceți clic pe butonul „Visual Basic” din panoul „Cod”. Această acțiune va afișa mediul de programare VBA.
Lipiți următorul program în fereastra de programare care apare. Acest program folosește notația hexazecimală pentru a atribui o culoare de fundal celulei selectate curent din registrul de lucru. Această notație apare în atribuirile variabilelor „roșu”, „verde” și „albastru”. Declarația „ActiveCell” folosește, de asemenea notație hexazecimală și adaugă componentele „roșu”, „verde” și „albastru” împreună pentru a obține un număr în formatul necesar pentru setare culori în Excel. Observați că numai variabila „roșie” este diferită de zero. Aceasta înseamnă că culoarea pe care o vei vedea va fi roșu pur.
Public Sub colorCell() Dim albastru, verde, roșu roșu = &HFF verde = &H0 albastru = &H0 ActiveCell. Interior. Culoare = albastru * &HFF00 + verde * &HFF + roșu End Sub
