WorksheetFunction.Asc (Excel)

Para idiomas de conjunto de caracteres de dois bytes DBCS, altera caracteres de largura total (byte duplo) para caracteres de meia largura (byte único).

WorksheetFunction. ASC () não é equivalente a ASC (), que converte uma cadeia de caracteres em um inteiro.

Asc (Arg1)

Arg1: O texto ou a referência a uma célula que contém o texto que você deseja alterar. Se o texto não contiver letras de largura total, o texto não será alterado.

Dim strArg1 As String: strArg1 = 
Dim str As String
str = WorksheetFunction.Asc(Arg1:=strArg1)