Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Usar idioma Coreano na programação VBA

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Jtruculo
Acabou de chegar
Acabou de chegar
Mensagens: 8
Registrado em: Sáb Mar 12, 2016 5:24 am

Usar idioma Coreano na programação VBA

Mensagem por Jtruculo »

Olá pessoal,
Tudo bem com vcs?!!!

Preciso converter o texto de uma coluna do idioma Coreano para Português, pretendo fazer isso através de uma function personalizada mas não estou conseguindo inserir os caracteres dentro do módulo que fará a busca.

Criei a função mas não consigo colar os caracteres, o VBA troca por "????" todos os caracteres do idioma coreano

Já alterei o idioma do office mas não deu certo, só consigo fazer através de tabela, usando o método Range, mas gostaria mesmo de usar

tentei colar do bloco de notas onde aceita os caracteres Coreanos, mas ao colar no módulo o VBA converte em "?" ponto de interrogação

se algum já teve este problema e puder compartilhar a solução serei imensamente grato

Seguem os códigos


Método Direto:

Public Function Translate(Korean_Text As String) As String

'Neste caso o VBA troca o texto Coreano por interrogação "????"
If Korean_Text = "관리비" Then
Translate = "Despesas Administrativas"

ElseIf Korean_Text = "간접비용" Then
Translate = "Custo Indireto"

ElseIf Korean_Text = "직접비용" Then
Translate = "Custo Direto"

End If

End Function

Método Range:

'Esse método deu certo, mas não é isso que gostaria de fazer

Public Function Translate(Korean_Text As String) As String

If Korean_Text = Range("G3").Value Then
Translate = "Despesas Administrativas"

ElseIf Korean_Text = Range("G4").Value Then
Translate = "Custo Indireto"

ElseIf Korean_Text = Range("G5").Value Then
Translate = "Custo Direto"

End If

End Function

Desde já obrigado


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
NRAlbukas
Colaborador
Colaborador
Mensagens: 24
Registrado em: Qua Jun 16, 2021 12:10 pm
Contato:

Re: Usar idioma Coreano na programação VBA

Mensagem por NRAlbukas »

Ola amigo. :mrgreen:

Não encontrei outra forma de faze-lo, o método range se mostra o mais eficiente.
O VBA não reconhece caracteres que não estão configurados, daria para mudar o idioma do VBA, porem ocorreria um erro semelhante, pois ele reconheceria nossos caracteres.

Att Nathan. Vlw


Responder