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]Obter resultado consultando valor em duas colunas

    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Obter resultado consultando valor em duas colunas Empty [Resolvido]Obter resultado consultando valor em duas colunas

    Mensagem  thiagonsilvaa 19/8/2020, 15:19

    Bom dia a todos !

    Tenho um formulário ao qual vou efetuar um cadastro.

    Nele possui um campo valor.
    Gostaria que, ao digitar o valor ele buscasse na tblfaixa a faixa do valor correspondente digitado (com base nas duas colunas) e retornasse em um outro campo a descrição correspondente.


    Tentei por consultas, vba e não tive resultados.

    Estou postando o anexo para que se alguém puder, analisar.

    Desde já, muito obrigado.
    Anexos
    [Resolvido]Obter resultado consultando valor em duas colunas AttachmentDB.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (35 Kb) Baixado 1 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1779
    Registrado : 13/12/2016

    [Resolvido]Obter resultado consultando valor em duas colunas Empty Re: [Resolvido]Obter resultado consultando valor em duas colunas

    Mensagem  Alexandre Fim 19/8/2020, 16:17

    Ola Thiago,

    Fiz uma implementação no código que faz esta validação, conforme abaixo:
    [Resolvido]Obter resultado consultando valor em duas colunas Valida11

    O sistema exibe quando não há faixa equivalente ao valor, e não permite salvar os dados:
    [Resolvido]Obter resultado consultando valor em duas colunas Valida12


    Segue versão do arquivo anexo.

    Espero ter ajudado.

    Boa sorte.
    Anexos
    [Resolvido]Obter resultado consultando valor em duas colunas AttachmentDB_v2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (30 Kb) Baixado 5 vez(es)
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Obter resultado consultando valor em duas colunas Empty Re: [Resolvido]Obter resultado consultando valor em duas colunas

    Mensagem  thiagonsilvaa 19/8/2020, 16:33

    Boa tarde meu caro !

    Perfeitamente funcionando.

    Eu tinha usado um código pra fazer um loop, porém estava retornando apenas a última faixa da tabela:

    Código:
        Dim db As dao.Database
        Dim rs As Recordset
       
        Set db = CurrentDb()
        Set rs = db.OpenRecordset("select * from tblfaixa ")
       
       
        Do While Not rs.EOF
        If valor>= rs("valorminimo") AND Valorpersonalidade <= rs("valormaximo") Then

        Descricao= rs("descricao")

        End If
        rs.MoveNext
        Loop

    Teoricamente meu raciocínio estava correto, era conveniente fazer um loop pra fazer a varredura das tabelas e encontrar a faixa correta.
    Porém falhei na escrita do código.

    Agradeço demais pela força !

    Muito obrigado !!!
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Obter resultado consultando valor em duas colunas Empty Re: [Resolvido]Obter resultado consultando valor em duas colunas

    Mensagem  thiagonsilvaa 19/8/2020, 16:33

    Tópico resolvido
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1779
    Registrado : 13/12/2016

    [Resolvido]Obter resultado consultando valor em duas colunas Empty Re: [Resolvido]Obter resultado consultando valor em duas colunas

    Mensagem  Alexandre Fim 19/8/2020, 16:59


    Sim, seu raciocínio estava correto, porém, tinha um erro nesta linha:

    If Valor >= rs("valorminimo") And Valorpersonalidade <= rs("valormaximo") Then

    Mas o importante é que vc entendeu a implementação realizada e o problema foi solucionado.

    O fórum agradece.

    Boa sorte no teu projeto

    Abraço


      Data/hora atual: 22/9/2021, 06:01