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]Consulta em VBA

    Davi.lrcampos
    Davi.lrcampos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 80
    Registrado : 02/02/2012

    [Resolvido]Consulta em VBA Empty Consulta em VBA

    Mensagem  Davi.lrcampos 10/8/2012, 19:29

    Boa tarde, galera

    Sempre utilizei consultas ações para atender minhas necessidades, os códigos abaixo são de uma consulta que usei pra adicionar itens no estoque, está funcionando, porém gostaria de compreender como posso utiliza-la embutida no código vba pra eu não precisar encher meu bd de consultas. Alguém poderia me explicar como transformo isso em VBA e como funciona pra eu poder resolver as outras...

    Espero que alguém possa me ajudar.

    "Utilizo Access 2010"


    UPDATE Compra_Combustivel INNER JOIN Combustivel ON Compra_Combustivel.Combustivel_Lança = Combustivel.Descricao SET Combustivel.Entrada = [Formulários]![Compra]![Add_Litros]
    WHERE (((Combustivel.Descricao)=[Formulários]![Compra]![Produto_Lança]));


    Grato,



    Davi
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Consulta em VBA Empty Re: [Resolvido]Consulta em VBA

    Mensagem  Alexandre Neves 10/8/2012, 19:40

    Boa tarde, Ircampos
    Currentdb.execute "UPDATE Compra_Combustivel INNER JOIN Combustivel ON Compra_Combustivel.Combustivel_Lança = Combustivel.Descricao SET Combustivel.Entrada =" & Formulários!Compra!Add_Litros & " WHERE Combustivel.Descricao=" & [Formulários]![Compra]![Produto_Lança]
    Davi.lrcampos
    Davi.lrcampos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 80
    Registrado : 02/02/2012

    [Resolvido]Consulta em VBA Empty Re: [Resolvido]Consulta em VBA

    Mensagem  Davi.lrcampos 10/8/2012, 19:47

    Obrigado Alexandre

    Agora vou estudar a diferença entre ambas pra poder alterar as outras que tenho.


    Conteúdo patrocinado


    [Resolvido]Consulta em VBA Empty Re: [Resolvido]Consulta em VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 03:09