Plak het volgende programma in het venster in het midden van het scherm. Dit programma gebruikt VBA's hexadecimale notatiesymbool, "&H", om twee variabelen, "a" en "b", te definiëren. Variabele "x" geldt de som van deze twee getallen, en de "MsgBox"-instructie geeft de niet-hexadecimale representaties van "a", "b" en "x."
Openbare Sub doHexMath() Dim x, a, b a = &H10 b = &HA x = a + b MsgBox a & " plus " & b & " is gelijk aan " & x End Sub
Klik op de opdracht "Uitvoeren" van het menu "Uitvoeren". Excel geeft het bericht '16 plus 10 is gelijk aan 26' weer. In hexadecimaal is "10" gelijk aan 16 en "A" is gelijk aan 10.
Klik op het tabblad 'Ontwikkelaar' en klik vervolgens op de knop 'Visual Basic' in het paneel 'Code'. Deze actie zal de VBA-programmeeromgeving oproepen.
Plak het volgende programma in het programmeervenster dat verschijnt. Dit programma gebruikt hexadecimale notatie om een achtergrondkleur toe te wijzen aan de momenteel geselecteerde cel in de werkmap. Die notatie verschijnt in de toewijzingen aan de variabelen 'rood', 'groen' en 'blauw'. De "ActiveCell"-instructie gebruikt ook hexadecimale notatie, en voegt de componenten "rood", "groen" en "blauw" samen om een getal op te leveren in het formaat dat nodig is om in te stellen kleuren in Excel. Merk op dat alleen de "rode" variabele niet nul is. Dit betekent dat de kleur die u ziet puur rood is.
Public Sub colorCell() Dim blauw, groen, rood rood = &HFF groen = &H0 blauw = &H0 ActiveCell. Interieur. Kleur = blauw * &HFF00 + groen * &HFF + rood Einde Sub