Med hexadecimal notation gör det lättare att förstå de siffror som vissa VBA objekt eller egenskaper använder . En sådan egenskap är färgen . Till exempel, bas - 10 notation " 65025 " inte avslöja den tredelade strukturen i numret , men med hjälp av hexadecimal notation för samma antal , " & HFF00FF , " avslöjar denna struktur : färgens röda komponenten är i två tecknen längst till höger , är den blå komponenten i de två mittersta tecknen , och den gröna komponenten är i femte och sjätte tecken från höger . Instruktioner
hexadecimal Math
1
Klicka på " Utvecklare " fliken för att avslöja kontrollerna för att arbeta med VBA .
2
Klicka på " Visual Basic " knappen för att komma VBA -programmering miljö .
3
Klistra in följande program i fönstret på skärmens mitt . Detta program använder VBA : s hexadecimal notation symbol , " & H , " att definiera två variabler , " a " och " b". Variabel " x " rymmer summan av dessa två tal , och " MsgBox " uttalande visar de icke - hexadecimala representationer av " a ", " b " och " x ".
Public Sub doHexMath ( )
Dim x , a, b
a = & H10
b = & HA
x = a + b på
MsgBox a & " plus " & b & " jämlikar " & x
End Sub
4
Klicka på någon av programmets påståenden att välja program .
5
Klicka "Kör" -menyn är " Kör " -kommandot . Excel kommer att visa meddelandet " 16 plus 10 är lika med 26 . " I hexadecimal , lika med " 10 " 16 , och " A " är lika med 10 .
Set Colors
6
Klicka på " Utvecklare " fliken, klicka sedan på " Visual Basic " -knappen på " Code " -panelen . Denna åtgärd kommer att ta upp VBA-programmering miljö .
7
Klistra in följande program i programplaneringen fönstret som visas . Detta program använder hexadecimal notation för att tilldela en bakgrundsfärg till den markerade cellen i arbetsboken . Denna notation visas i uppdragen till de variabler " röda ", " gröna " och " blå ". Den " ActiveCell " uttalande använder också hexadecimal notation , och tillägger " röda ", " gröna " och "blå" komponenterna tillsammans för att ge ett antal i det format som krävs för att ställa in färgerna i Excel . Observera att endast de " röda " variabeln är noll . Detta innebär att den färg du ser kommer att vara ren röd .
Public Sub colorCell ( ) katalog
Dim blå , grön , röd
röd = & HFF
grön = & H0
blå = & H0
ActiveCell.Interior.Color = blue * & HFF00 + grön * & HFF + röd
End Sub
8
Klicka något uttalande i programmet för att välja det program för exekvering .
9
Klicka på " Kör " -menyn är " Kör " -kommandot för att köra programmet .
10
Klicka på " Excel " -ikonen i aktivitetsfältet i Windows för att återgå till Excel . Lägg märke till att den aktuella cellen har den röda färgen som du angav i steg 2 .
