Office não reconhece caracter especial !!!
Moderador: Avelino Sampaio
-
- Mensagens: 121
- Registrado em: 02 Mai 2016, 18:06
Office não reconhece caracter especial !!!
Bom dia,
tenho um BD que uso para gerar em uma planilha do Excel, uma especie de script, que é usado em um programa da empresa.
Quando fiz esse BD ele funcionava normalmente na minha maquina, e passei para o usuário que continua usando.
Porem ontem fui usar na minha maquina e percebi que o caracter esta diferente.
Na maquina que esta funcionando roda o Win 7 64 Bits:
Na minha maquina que não esta funcionando roda o Win 10 Enterprise 64 Bits:
Nos dois casos o Office é exatamento o mesmo, inclusive a Build:
Ja tentei enviar o caracter via Skype, txt, e-mail e até copiei o BD da maquina que esta funcionando, mas assim que coloco na minha maquina, o caracter muda.
Alguem pode ajudar ?
Grato
tenho um BD que uso para gerar em uma planilha do Excel, uma especie de script, que é usado em um programa da empresa.
Quando fiz esse BD ele funcionava normalmente na minha maquina, e passei para o usuário que continua usando.
Porem ontem fui usar na minha maquina e percebi que o caracter esta diferente.
Na maquina que esta funcionando roda o Win 7 64 Bits:
Na minha maquina que não esta funcionando roda o Win 10 Enterprise 64 Bits:
Nos dois casos o Office é exatamento o mesmo, inclusive a Build:
Ja tentei enviar o caracter via Skype, txt, e-mail e até copiei o BD da maquina que esta funcionando, mas assim que coloco na minha maquina, o caracter muda.
Alguem pode ajudar ?
Grato
Você não está autorizado a ver ou baixar esse anexo.
Re: Office não reconhece caracter especial !!!
Olá prezado tudo bem,
Voce nao especificou se este conjunto de caracteres sao uma cadeia de string com base em uma fonte especifica, caso nao seja tente usar a função Chr(valor) para ver qual o caractere que voce precisa usar. use este laço e veja todos os caracteres em ASCII.
Voce nao especificou se este conjunto de caracteres sao uma cadeia de string com base em uma fonte especifica, caso nao seja tente usar a função Chr(valor) para ver qual o caractere que voce precisa usar. use este laço e veja todos os caracteres em ASCII.
Código: Selecionar todos
Sub teste4()
Dim i As Integer, res As String
For i = 0 To 255
If i = 255 Then
res = "Nº: " & i & "= " & Chr(i)
Debug.Print res
Else
res = "Nº: " & i & "= " & Chr(i) & " " & "Nº: " & i + 1 & "= " & Chr(i + 1)
Debug.Print res
End If
Next
End Sub
-
- Mensagens: 121
- Registrado em: 02 Mai 2016, 18:06
Re: Office não reconhece caracter especial !!!
Bom dia bydevsis, obrigado pela resposta.
O código que citei é usado para criar uma tabela que é exportada para Excel, conforme abaixo:
Esse é o carácter que preciso usar:
Mas ao copiar e colar na linha de programação, ele fica da forma circula em vermelho (?), e se eu enviar esse caracter de outro PC, seja via e-mail, Skype, txt etc, ele converte o caracter (←) na forma circulada em azul ([]):
Resumindo, preciso utilizar o carácter ← em uma linha de programação, mas o VBA parece não reconhecer esse carácter.
Alguém sabe como resolver ?
Grato
O código que citei é usado para criar uma tabela que é exportada para Excel, conforme abaixo:
Esse é o carácter que preciso usar:
Mas ao copiar e colar na linha de programação, ele fica da forma circula em vermelho (?), e se eu enviar esse caracter de outro PC, seja via e-mail, Skype, txt etc, ele converte o caracter (←) na forma circulada em azul ([]):
Resumindo, preciso utilizar o carácter ← em uma linha de programação, mas o VBA parece não reconhecer esse carácter.
Alguém sabe como resolver ?
Grato
Você não está autorizado a ver ou baixar esse anexo.
Re: Office não reconhece caracter especial !!!
opa Leandro, blz?
Na minha IDE tambem não apareceu o caractere "seta", se seu objetivo é exportar esta cadeia de strings, eu fiz uma outra tentativa e funcionou, assim.
E este foi o resultado na janela imediata:
Ao exportar esta tabela teste para o Excel as setas também foram, creio que ao usar a função chr(27) (seta a esquerda) vai funcionar no seu projeto.
Na minha IDE tambem não apareceu o caractere "seta", se seu objetivo é exportar esta cadeia de strings, eu fiz uma outra tentativa e funcionou, assim.
Código: Selecionar todos
Sub teste4()
Dim i As Integer, res As String
For i = 1 To 10
'chr(27) é o caractere "seta"
res = "c" & Format(i, "000000") & "B" & Chr(27) & "B" & Chr(27) & "B" & Chr(27) & "B" & Chr(27)
Debug.Print res
sql = "INSERT INTO tb_teste ( campo01 ) VALUES (" & Chr(34) & res & Chr(34) & ")"
F_RunSQL sql
Next
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "tb_teste", "C:\Sistemas\Temp\teste.xls", True
Debug.Print "Pronto"
End Sub
E este foi o resultado na janela imediata:
Código: Selecionar todos
c000001BBBB
c000002BBBB
c000003BBBB
c000004BBBB
c000005BBBB
c000006BBBB
c000007BBBB
c000008BBBB
c000009BBBB
c000010BBBB
Pronto
Ao exportar esta tabela teste para o Excel as setas também foram, creio que ao usar a função chr(27) (seta a esquerda) vai funcionar no seu projeto.
-
- Mensagens: 121
- Registrado em: 02 Mai 2016, 18:06
Re: Office não reconhece caracter especial !!!
Bom dia bydevsis, obrigado pela ajuda,
infelizmente não estou conseguindo fazer funcionar.
Veja abaixo que utilizei sua sugestão, porem a "seta a esquerda" não aparece, nem na tabela do Access, nem quando é exportada para o Excel:
Em uma maquina com o Win7 instalado, isso não acontece. Até na linha de comando do VBA aparece a "seta a esquerda".
Seria uma problema do SO ? Alguma configuração ?
Estou bem preocupado, pois nas maquinas com Win7 instalado, sera feito o a mudança para o Win10, e tenho medo que todas apresentem o problema.
infelizmente não estou conseguindo fazer funcionar.
Veja abaixo que utilizei sua sugestão, porem a "seta a esquerda" não aparece, nem na tabela do Access, nem quando é exportada para o Excel:
Em uma maquina com o Win7 instalado, isso não acontece. Até na linha de comando do VBA aparece a "seta a esquerda".
Seria uma problema do SO ? Alguma configuração ?
Estou bem preocupado, pois nas maquinas com Win7 instalado, sera feito o a mudança para o Win10, e tenho medo que todas apresentem o problema.
Você não está autorizado a ver ou baixar esse anexo.
Re: Office não reconhece caracter especial !!!
Opá Leandro tudo bem?
Achei estes dois artigos que talvez possam te ajudar, veja se lhe ajudam.
http://blog.nkadesign.com/2013/vba-unicode-strings-and-the-windows-api/
https://www.spreadsheet1.com/how-to-display-foreign-characters-in-vbe.html
Achei estes dois artigos que talvez possam te ajudar, veja se lhe ajudam.
http://blog.nkadesign.com/2013/vba-unicode-strings-and-the-windows-api/
https://www.spreadsheet1.com/how-to-display-foreign-characters-in-vbe.html
-
- Mensagens: 121
- Registrado em: 02 Mai 2016, 18:06
Re: Office não reconhece caracter especial !!!
bydevsis escreveu:Opá Leandro tudo bem?
Achei estes dois artigos que talvez possam te ajudar, veja se lhe ajudam.
http://blog.nkadesign.com/2013/vba-unicode-strings-and-the-windows-api/
https://www.spreadsheet1.com/how-to-display-foreign-characters-in-vbe.html
Bom dia bydevsis,
não consegui usar os artigos para adaptar meu código.
Quem está online
Usuários neste fórum: Nenhum usuário registrado e 2 visitantes