Kako uporabljati Hex v VBA Excel

Uporaba šestnajstiškega zapisa olajša razumevanje števil, ki jih uporabljajo določeni predmeti ali lastnosti VBA. Ena takih lastnosti je barva. Na primer, zapis z osnovo 10 "65025" ne razkrije tridelne strukture števila, vendar uporaba šestnajstiškega zapisa za isto število, "&HFF00FF," razkrije to strukturo:rdeča komponenta barve je v dveh skrajno desnih znakov, modra komponenta je v dveh srednjih znakih, zelena komponenta pa je v petem in šestem znaku z desne.

Šestnajstiška matematika

1. korak

Kliknite zavihek »Razvijalec«, da prikažete kontrolnike za delo z VBA.

2. korak

Kliknite gumb "Visual Basic", da vstopite v programsko okolje VBA.

3. korak

Prilepite naslednji program v okno na sredini zaslona. Ta program uporablja šestnajstiški simbol VBA, "&H", za definiranje dveh spremenljivk, "a" in "b." Spremenljivka "x" vsebuje vsoto teh dveh števil, stavek "MsgBox" pa prikazuje nešestnajstiške predstavitve "a", "b" in "x."

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

4. korak

Kliknite kateri koli stavek programa, da izberete program.

5. korak

Kliknite ukaz »Zaženi« v meniju »Zaženi«. Excel bo prikazal sporočilo "16 plus 10 je enako 26." V šestnajstiškem zapisu je "10" enako 16, "A" pa 10.

Nastavitev barv

1. korak

Kliknite zavihek »Razvijalec« in nato kliknite gumb »Visual Basic« na plošči »Koda«. To dejanje bo odprlo programsko okolje VBA.

2. korak

Prilepite naslednji program v okno za programiranje, ki se prikaže. Ta program uporablja šestnajstiški zapis za dodelitev barve ozadja trenutno izbrani celici v delovnem zvezku. Ta zapis se pojavi v dodelitvah spremenljivkam "rdeča", "zelena" in "modra". Stavek "ActiveCell" prav tako uporablja šestnajstiški zapis in doda "rdečo", "zeleno" in "modro" komponento skupaj, da dobi število v obliki, ki je potrebna za nastavitev barv v Excelu. Upoštevajte, da samo "rdeča" spremenljivka ni ničelna. To pomeni, da bo barva, ki jo boste videli, čisto rdeča.

Public Sub colorCell() Dim blue, green, red red =&HFF green =&H0 blue =&H0 ActiveCell.Interior.Color =blue * &HFF00 + green * &HFF + red End Sub

3. korak

Kliknite kateri koli stavek v programu, da izberete program za izvedbo.

4. korak

Kliknite ukaz »Zaženi« v meniju »Zaženi«, da zaženete program.

5. korak

Kliknite ikono "Excel" v opravilni vrstici Windows, da se vrnete v Excel. Opazite, da ima trenutna celica rdečo barvo, ki ste jo določili v 2. koraku.