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


4 participantes

    [Resolvido]Transformar valor por extenso

    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Transformar valor por extenso

    Mensagem  abelardofp 28/6/2011, 14:42

    Criei o módulo e copiei conforme explica no Fórum, mais não leva o extenso para caixa de texto que tenho naquele formulário de cadastro de duplicatas, será que vocês poderiam me ajudar quanto a isto, como disse eu não entendo muito de programação.

    Se precisar te mando o arquivo para vocês darem uma olhada, até acrescentei já no relatório o layout da duplicata já levando os dados do clientes e valores do cadastro de duplicatas, ficou muito bom.

    Obrigado.
    OsmarJr
    OsmarJr
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 20/10/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  OsmarJr 28/6/2011, 14:58

    Na caixa onde deve aparecer o extenso:

    =Extenso([CampoValor])

    ou, no evento Após Atualizar do campo que recebe o valor

    Me("CampoExtenso") = Extenso(Me("CampoValor"))


    .................................................................................
    affraid Diferença entre mulher na TPM e pitbull com raiva: O BATOM (hoje apanho em casa)... affraid
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 28/6/2011, 15:04

    Poderia me explicar passo a passo, desde o início das fórmulas, pois continua não dando certo.

    avatar
    ton0612
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 30/03/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  ton0612 28/6/2011, 15:25

    Amigos desculpe a intromissão mas creio que posso ajudar.

    Anexo esta um link no megauplod.

    baixe o arquivo é um banco de teste onde tem o módulo Valor Extenso

    importe este módulo para o seu aplicativo e então coloque em um campo, como origem dos dados:

    = Extenso ([CampoComValorNumerico])

    e aparecerá o valor por extenso.

    http://www.megaupload.com/?d=BW5AA1RJ

    Obs. Este código não é meu... Eu peguei de um outro aplicativo em Access que tinha na empresa onde trabalho, mas creio que no fórum também deve ter algo. (aqui tem de tudo, rsrs)
    OsmarJr
    OsmarJr
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 20/10/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  OsmarJr 28/6/2011, 15:44

    Baixe este exemplo.


    .................................................................................
    affraid Diferença entre mulher na TPM e pitbull com raiva: O BATOM (hoje apanho em casa)... affraid
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 28/6/2011, 16:01

    Tentei de todo jeito mais nada consegui, lembrando que estou fazendo dentro de um formulário.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  vieirasoft 28/6/2011, 16:57

    Coloque a bd aqui no fórum para alguém ajudar. Se não conseguir, envie para o meu email.

    sergiovieirasoft@gmail.com
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 28/6/2011, 17:21

    Boa Tarde,

    Srs., até que enfim quebrando muito a cabeça consegui resolver, agradeço a todos do Fórum, pois tem me ajudado muito.

    Consegui vendo no youtube o vídeo do ProfessorLar, muito simples e prático.

    Abraços,

    Abelardo[b
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  vieirasoft 28/6/2011, 17:24

    Obrigado pelo retorno. O fórum agradece e parabéns.
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 29/6/2011, 01:01

    Sr. Vieira,

    Gostaria de saber se deu certo o arquivo.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  vieirasoft 29/6/2011, 01:04

    O arquivo foi reenviado para o Colega Haryshon, pois eu neste momento não podia ver isso. Aguarde que o colega logo que possa coloca aqui.

    Obrigado.
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 29/6/2011, 01:06

    Muito obrigado então e tenha uma boa noite.

    Abraços
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  vieirasoft 29/6/2011, 01:09

    Abraço
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 29/6/2011, 23:30

    Boa Noite Dr. Haryshon,

    Gostaria de confirmar se você recebeu meu arquivo que eu tinha enviado ao Sr. Vieira, é só um probleminha que eu tenho com o extenso, no email que enviei para ele tem explicando tudo.

    Fico agradecido e desculpe se estiver lhe aborrecendo, muito obrigado.

    Abraços,


    .................................................................................
    Abelardo Freitas Paz
    MSN abelardo_30@hotmail.com
    Fone: (85) 3244-1095 / 9101-3703
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  vieirasoft 29/6/2011, 23:47

    Amigão, boa tarde

    Vou saber se ele recebeu, pois não veio devolvido, mas por vezes os provedores apagam as mensagens ou vai para spam e ninguém dá por isso. Entretanto, trate-nos por colegas, o Senhor, está no Céu e o Dr. Hary é nota 10..rsrsrs.
    avatar
    Convidado
    Convidado


    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  Convidado 30/6/2011, 00:38

    Boa noite Amigão.. acabei de baixá-lo
    o que precisa?
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 30/6/2011, 01:35

    Amigão Harysohn, eu consegui colocar no formulário cadduplicata formular o valor extenso para sair na caixa de extenso, só que eu estava analisando e percebi que o formulário não está levando o extenso para a tabela tblduplicatas, tentei fazer mais não sei como, porque só posso fazer sair no relatorio Rltduplicata se estiver dentro da tblduplicatas, pois está puxando de lá as informações, você poderia ver isto pra mim.

    Lhe agradeço muito se poder mim ajudar.

    Abraços,

    Abelardo


    .................................................................................
    Abelardo Freitas Paz
    MSN abelardo_30@hotmail.com
    Fone: (85) 3244-1095 / 9101-3703
    avatar
    Convidado
    Convidado


    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  Convidado 30/6/2011, 02:59

    Amigo abelardo...

    Adicionei um módulo.. BasExtenso.. nele se esta inserido o código que faz a conversão do valor digitado em valor por extenso...

    Ao cadastrar a duplicata nao precisa digitar nada na caixa valor por extenso, pois o código ja o preenche automaticamente apos atualizar o campo valor..

    Veja que no evento apos atualizar do campo valor inseri o código que utiliza a função BasExtenso para fazer a devida conversão..

    No form de consulta de duplicatas tambem inseri o código pois se caso queira alterar o valor ele o faz tembem
    Ao cadastrar ou alterar o valor na duplicata o texto por extenso ja fica gravado na tbl duplicatas


    http://dl.dropbox.com/u/26441349/Abelardo.rar

    Saudações
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 30/6/2011, 11:42

    Bom dia Harysohn,

    Valeu deu certo, agora vou só criar o relatório de duplicatas para sair impresso nos campos no formato de uma duplicata.

    Muito obrigadão mesmo.

    Agora está resolvido por completo.

    Agradeço ao Fórum e a todos que tem me ajudado.

    Vou criar uns botões de navegação no BD e deixar com cara de sistema, se quiser posso deixar ele liberado para o fórum caso queira o sistema.

    Abraços,


    .................................................................................
    Abelardo Freitas Paz
    MSN abelardo_30@hotmail.com
    Fone: (85) 3244-1095 / 9101-3703
    avatar
    Convidado
    Convidado


    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  Convidado 30/6/2011, 11:59

    Que bom ficamos felizes... caso queira ao terminar me envie, verifico possiveis erros de compilação e o posto no repositório. Exemplos são sempre de muita valia para todos..

    O Fórum agradece o retorno

    Bom trabalho
    avatar
    abelardofp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 25/06/2011

    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  abelardofp 30/6/2011, 17:37

    Ok. farei isto sim.

    Abraços


    .................................................................................
    Abelardo Freitas Paz
    MSN abelardo_30@hotmail.com
    Fone: (85) 3244-1095 / 9101-3703

    Conteúdo patrocinado


    [Resolvido]Transformar valor por extenso Empty Re: [Resolvido]Transformar valor por extenso

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 14:09