MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Como imprimir relatório eliminando os acentos

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Como imprimir relatório eliminando os acentos Empty Como imprimir relatório eliminando os acentos

    Mensagem  spp 20/2/2012, 13:56

    Bom Dia a todos!

    Tenho uma impressora não fiscal, gostaria que quando imprimisse o relatório eliminassem os acentos.

    Aguadeço desde já
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Como imprimir relatório eliminando os acentos Empty Re: [Resolvido]Como imprimir relatório eliminando os acentos

    Mensagem  criquio 20/2/2012, 14:04

    Olá! Uma forma simples pode ser tentar carregar os campos do relatório de acordo os campos do formulário usando o Replace para mudar as letras acentuadas. Por exemplo, para tirar o acento de "á", "ê" e "õ"

    Me.NomeDoCampo = Replace(Replace(Replace(Forms!NomeDoForm!NomeDoCampo, "á", "a", , , vbBinaryCompare), "ê", "e", , , vbBinaryCompare), "õ", "o", , , vbBinaryCompare)

    Com isso, bastaria adicionar Replaces para as outras letras.


    Última edição por criquio em 20/2/2012, 14:57, editado 2 vez(es)


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Como imprimir relatório eliminando os acentos Empty Re: [Resolvido]Como imprimir relatório eliminando os acentos

    Mensagem  spp 20/2/2012, 14:18

    criquio

    Não tem jeito de colocar no proprio relatório e no formulário ficasse com acentos
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Como imprimir relatório eliminando os acentos Empty Re: [Resolvido]Como imprimir relatório eliminando os acentos

    Mensagem  criquio 20/2/2012, 14:26

    Isso que eu passei seria exatamente no relatório. O relatório seria desvinculado e com o código acima no evento "Ao carregar". Mas isso se for um relatório simples. Se for relatório contínuo deve funcionar melhor no evento "Ao imprimir" talvez.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Como imprimir relatório eliminando os acentos Empty Re: [Resolvido]Como imprimir relatório eliminando os acentos

    Mensagem  spp 20/2/2012, 15:42

    criquio

    Obrigado pela ajuda consegui em módulo vba, e funcinou perfeitamente no formulário.

    Conteúdo patrocinado


    [Resolvido]Como imprimir relatório eliminando os acentos Empty Re: [Resolvido]Como imprimir relatório eliminando os acentos

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 18:59