Conteúdo

# Função Hex

Devolve uma cadeia que representa o valor hexadecimal de um número.

## Sintaxe:

    Hex (Número)

## Valor de retorno:

Cadeia

## Parâmetros:

Número: qualquer expressão numérica que pretende converter num número hexadecimal.

### Códigos de erro

5 Chamada de procedimento inválido

## Exemplo:

    Sub ExampleHex
    ' utiliza fórmulas básicas no LibreOffice Calc
    Dim a2, b2, c2 As String
        a2 = "&H3E8"
        b2 = Hex2Lng(a2)
        MsgBox b2
        c2 = Lng2Hex(b2)
        MsgBox c2
    End Sub

    Function Hex2Lng(sHex As String) As Long
    ' Devolve um número inteiro assinado de 32 bits a partir de um valor hexadecimal de 8 dígitos.
        Hex2Lng = clng( sHex )
    End Function

    Function Lng2Hex(iLong As Long) As String
    ' Calcula o valor hexadecimal de 8 dígitos a partir de um número inteiro com sinal de 32 bits.
        Lng2Hex = "&H" & Hex( iLong )
    End Function

Necessitamos da sua ajuda!