ejemplo de código de excel binario a decimal de 32 bits

El paso a paso o código que encontrarás en este artículo es la resolución más eficiente y efectiva que encontramos a esta duda o problema.

Ejemplo: vba bits a byte

'Extremely fast VBA function to convert a binary string to a Byte:Function BitsToByte(bits$)AsByteDim i&Static b()AsByteIf LenB(bits)>16ThenExitFunctionIf LenB(bits)=16Then
        b = bits
    Else
        b =String$(8- Len(bits),"0")& bits
    EndIfFor i =0To14Step2
        BitsToByte =2* BitsToByte Or(b(i)Xor48)NextEndFunction'Example:

MsgBox BitsToByte("00001100")'<--displays: 12
MsgBox BitsToByte("10000001")'<--displays: 129'''

Te mostramos las reseñas y valoraciones de los usuarios

Si posees alguna desconfianza o forma de aclararse nuestro crónica puedes dejar una referencia y con placer lo leeremos.

---

---

Utiliza Nuestro Buscador