Funcão ChrW [VBA]

Retorna o caractere Unicode que corresponde ao código do caractere especificado.

Esta constante, função ou objeto se ativa com a instrução Option VBASupport 1 colocada antes do código executável do programa em um módulo.

Sintaxe:


ChrW(charcode As Integer) As String

Valor de retorno:

Cadeia

Parâmetros:

charcode: expressão numérica que representa um valor Unicode de 16 bits válido (0-65535). (Para dar suporte a expressões com argumentos nominais negativos tal como ChrW(&H8000), para fins de compatibilidade regressa, valores no intervalo −32768 a −1 são mapeados internamente no intervalo 32768 a 65535). Um valor vazio retorna o erro 5. Um valor fora do intervalo [0, 65535] retorna o código de erro 6.

Códigos de erro:

5 Chamada de procedimento inválida

6 Excedida a capacidade

Exemplo:


Sub ExampleChrW
    ' Este exemplo insere as letras gregas alfa e ômega numa cadeia.
    MsgBox "De " + ChrW(913) + " a " + ChrW(937)
    ' A mensagem aparece como : Do Α ao Ω
    MsgBox ChrW(charcode := 116) ' "t" letra T minúscula
End Sub

Função Asc (BASIC)

Função [VBA] AscW

Função Chr