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]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 18:49

    Boa tarde!

    Senhores,

    Estou com uma dificuldade, que não acerto funcionar.

    Tenho 3 campos: CODPROD - NOMEPROD - VALOPROD. Os dois primeiros são Caixa de Listagem e eu utilizo: "Me.NomeProd = Me.CodProd.Column(1)" para trazer a descrição e a descrição trazer o código. Porém o valor não sei como trazer.

    Alguém me ajuda?
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 13/6/2014, 19:01

    Olá, a listagem é feita em colunas e a primeira coluna é representada pelo 0(zero) e se vc consegue colocar o NomeProd, é só observar n número da coluna dele que é 1, então o próximo campo será coluna 2, ou seja: Me.CampoAreceberAinformação = Me.CodProd.Column(2)
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 19:05

    Então,

    Já tentei fazer este tipo, considerando que a coluna é zero (CODPROD) e a coluna 2 é a informação que eu preciso (VALORUNIT).

    No campo VALORUNIT não aparece nada.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Alexandre Neves 13/6/2014, 19:07

    Boa tarde,
    Me.NomeProd = Me.CodProd.Column(1)'a iteração das colunas começa em 0. Assim, procura o valor da 2ª coluna
    Para valor da 3ª coluna
    Me.NomeProd = Me.CodProd.Column(2)


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 19:07

    Estou usando assim:

    Código:
    Private Sub CodProd_AfterUpdate()
    NomeProd = Me.CodProd.Column(1)
    Me.ValorUnit = Me.CodProd.Column(2)
    End Sub
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Alexandre Neves 13/6/2014, 19:08

    Estava com o formulário aberto e, quando respondi, já estava ultrapassado.
    Disponibilize uma pequena amostra para se poder analisar


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 19:12

    Anexei o meu modelo.
    Anexos
    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor AttachmentBancoParaTeste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (33 Kb) Baixado 16 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8443
    Registrado : 05/11/2009

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Alexandre Neves 13/6/2014, 20:06

    Não percebi a lógica da utilização, mas, tem a caixa de combinação apenas com uma coluna. Assim, não pode ir buscar dados da 2ª coluna, pois não existe


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 20:11

    Conforme eu mencionei,

    Preciso que ao Alterar/Modificar o Código do Produto, traga a descrição e o valor Unitário.
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 13/6/2014, 20:13

    Alexandre, na verdade o que está ocasionando a não execução da rotina, é além de só ter 1 coluna como definição na combo, ele está usando um nome reservado "ValorUnit", joão troca para Valor_Unit e coloca o número de colunas da combox 3, e no evento após atualizar da combo, fica:
    NomeProd = Me.CodProd.Column(1)
    Me.Valor_Unit = Me.CodProd.Column(2)
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 13/6/2014, 20:22

    Faz o teste.


    Última edição por Beto Givoni em 13/6/2014, 21:09, editado 3 vez(es)
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 13/6/2014, 20:40

    Tem como você fazer no meu exemplo? Porque no que você postou, não consegui entender.

    Alterei os nomes na minha tabela para Valor_Unit e alterar no campo No Evento Após Atualizar e mesmo assim, não trouxe os valores.
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 13/6/2014, 20:59

    esse exemplo que eu postei é o mesmo que postastes. entra na propriedade da combox, aba "formato" e na propriedade número de colunas, coloca 3.
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 13/6/2014, 21:10

    Desculpa, tinha anexado o exemplo errado, pode baixar novamente do mesmo lugar acima.
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  joaomarcosferlinibento 16/6/2014, 15:38

    Beto,

    Obrigado pela sua ajuda.

    Gosto de entender antes de colocar em prática como funciona. E é verdade, tem que informar primeiro ao comando, aonde quer que traga o valor, e isso não tinha passado pela minha cabeça.

    Consegui fazer.

    Obrigado. Coloco este assunto como resolvido.
    avatar
    Convidado
    Convidado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Convidado 16/6/2014, 15:52

    Saudações do fórum pelo retorno e fechamento do tópico.

    Conteúdo patrocinado


    [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor Empty Re: [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 01:02