hola dgnro07, veo que lograstes resolver tu problema, de todas maneras te comparto parte de unas rutiinas que espero te puedan servir:
estas rutinas son parte de una que uso para guardar,leer el valor de un grupo de checkbox(40)
en Aa el valor decimal de los checkbox, valor que envio via modbus a una tarjeta de control
Dim mask%
Aa = 0
For i = 0 To 7
Aa = Aa + Check1(i) * 2 ^ i
Next
**********************************************************************************************
'BORRO CONTENIDO CHECKBOX K es el checkbox
For i = 0 To 7
Check1(K + i).value = False
Next
'***************RELLENO CHECKBOX ******************
Aa es el valor recibido por el puerto serial
For i = 0 To 7
mask% = 2 ^ i
Check1(K + i).value = IIf((Aa And mask%) > 0, 1, 0) '
http://support.microsoft.com/kb/113476/es Next
*************************************************************************************
y por que necesitas valores hex.
saludos
luis lopez