Kako koristiti Hex u VBA Excelu
Korištenje heksadecimalne notacije olakšava razumijevanje brojeva koje koriste određeni VBA objekti ili svojstva. Jedno takvo svojstvo je boja. Na primjer, zapis s bazom 10 "65025" ne otkriva trodijelnu strukturu broja, ali korištenje heksadecimalnog zapisa za isti broj, "&HFF00FF," otkriva ovu strukturu:crvena komponenta boje je u dva krajnji desni znakovi, plava komponenta je u dva srednja znaka, a zelena komponenta je u petom i šestom znaku s desne strane.
Heksadecimalna matematika
1. korak
Pritisnite karticu "Razvojni programer" da biste prikazali kontrole za rad s VBA.
2. korak
Pritisnite gumb "Visual Basic" za ulazak u VBA programsko okruženje.
3. korak
Zalijepite sljedeći program u prozor u sredini zaslona. Ovaj program koristi VBA-ov simbol heksadecimalne notacije, "&H", za definiranje dviju varijabli, "a" i "b". Varijabla "x" sadrži zbroj ova dva broja, a izjava "MsgBox" prikazuje neheksadecimalne prikaze "a", "b" i "x."
Public Sub doHexMath() Dim x, a, b a =&H10 b =&HA x =a + b MsgBox a &" plus " &b &" jednako " &x End Sub
4. korak
Pritisnite bilo koju izjavu programa da odaberete program.
Korak 5
Pritisnite naredbu "Pokreni" izbornika "Pokreni". Excel će prikazati poruku "16 plus 10 jednako je 26." U heksadecimalnom obliku, "10" je jednako 16, a "A" je jednako 10.
Postavite boje
1. korak
Kliknite karticu "Razvojni programer", zatim kliknite gumb "Visual Basic" na ploči "Kôd". Ova radnja će pokrenuti VBA programsko okruženje.
2. korak
Zalijepite sljedeći program u prozor za programiranje koji se pojavi. Ovaj program koristi heksadecimalni zapis za dodjelu boje pozadine trenutno odabranoj ćeliji u radnoj knjizi. Taj se zapis pojavljuje u dodjeljivanju varijabli "crveno", "zeleno" i "plavo". Izjava "ActiveCell" također koristi heksadecimalni zapis i dodaje "crvenu", "zelenu" i "plavu" komponentu zajedno da bi se dobio broj u formatu potrebnom za postavljanje boja u Excelu. Primijetite da samo "crvena" varijabla nije nula. To znači da će boja koju ćete vidjeti biti čisto crvena.
Public Sub colorCell() Prigušena plava, zelena, crvena crvena =&HFF zelena =&H0 plava =&H0 ActiveCell.Interior.Color =plava * &HFF00 + zelena * &HFF + crvena End Sub
3. korak
Pritisnite bilo koju naredbu u programu za odabir programa za izvršenje.
4. korak
Pritisnite naredbu "Pokreni" izbornika "Pokreni" da biste izvršili program.
Korak 5
Pritisnite ikonu "Excel" na programskoj traci sustava Windows za povratak u Excel. Primijetite da trenutna ćelija ima crvenu boju koju ste naveli u koraku 2.