Conteúdo

# ChrW Function [VBA]

Devolve o carácter Unicode correspondente ao código de carácter especificado.

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.

### Sintaxe:

    ChrW(charcode As Integer) As String

### Return type:

Cadeia

### Parâmetros:

charcode: Numeric expression that represent a valid 16 bit Unicode value (0-65535). (To support expressions with a nominally negative argument like ChrW(&H8000) in a backwards-compatible way, values in the range −32768 to −1 are internally mapped to the range 32768 to 65535.) An empty value returns error code 5. A value out of the range [0 to 65535] returns error code 6.

### Códigos de erro

5 Chamada de procedimento inválido

6 Excedida a capacidade

### Exemplo:

    Sub ExampleChrW
        ' Este exemplo insere as letras gregas Alfa e Ómega numa cadeia.
        MsgBox "From " + ChrW(913) + " to " + ChrW(937)
        ' A impressão aparece na caixa de diálogo como: De A até Ω
        MsgBox ChrW(charcode := 116) ' "t" lowercase T letter
    End Sub

Tópicos relacionados

Asc Function (BASIC)

AscW Function [VBA]

Chr Function