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


3 participantes

    [Resolvido]Atualizar campo via VBA

    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 20/4/2020, 22:48

    Grandes Mestres,

    Fiquei curioso com um post, já resolvido via consulta, de um amigo nosso aqui do forum (Jacir) e queria ver como ficaria isso via código VBA que estou tentando melhorar meus conhecimentos no mesmo. Abaixo os dizeres do post do nosso amigo Jacir:

    Gostaria da ajuda de vocês sobre a seguinte situação:
    a) Tenho duas tabelas, uma com o registro de Cabecalho (o registro é único) e informa o início, fim e o campo observação
    b) Outra tabela TabelaRegistroDetalhes pode ter vários registros da mesma placa e datas/horas diferentes. O sistema precisa comparar se a placa e as DatasOcorridas estão entre as de início e fim da tabela cabeçalho. Se estiver, precisa atualizar o campo observação da Tabela RegistroCabecalho para todos os registros que preencham os critérios. Aos que não preencham os critérios, precisa atualizar “Sem informação”.
    É possível fazer via módulo ou consulta?
    Obrigado,

    TabelaRegistroCabecalho
    Cod Placa DataHoraInicio DataHoraTermino Observação
    1 MMM1111 10/04/2020 09:00:00 14/04/2020 12:55:00 Errado
    2 ABC1234 15/04/2020 08:00:00 18/04/2020 12:55:00 Certo
    3 MMM1111 15/04/2020 08:00:00 18/04/2020 12:55:00 Certo

    TabelaRegistroDetalhes
    Placa DataOcorrido Observação
    MMM1111 09/04/2020 09:00 Sem informação
    MMM1111 09/04/2020 09:15 Sem informação
    MMM1111 10/04/2020 09:30 Errado
    MMM1111 10/04/2020 09:45 Errado
    MMM1111 10/04/2020 10:00 Errado
    MMM1111 10/04/2020 10:15 Errado
    MMM1111 10/04/2020 10:30 Errado
    MMM1111 10/04/2020 10:45 Errado
    MMM1111 10/04/2020 11:00 Errado
    MMM1111 10/04/2020 11:15 Errado
    ABC1234 15/04/2020 08:00 Certo
    MMM1111 15/04/2020 08:00 Certo
    MMM1111 15/04/2020 08:10 Certo
    MMM1111 15/04/2020 08:20 Certo
    MMM1111 15/04/2020 08:30 Certo
    MMM1111 15/04/2020 08:40 Certo
    MMM1111 15/04/2020 08:50 Certo
    MMM1111 15/04/2020 09:00 Certo
    MMM1111 15/04/2020 09:10 Certo
    MMM1111 15/04/2020 09:20 Certo
    MMM1111 15/04/2020 09:30 Certo
    MMM1111 15/04/2020 09:40 Certo
    MMM1111 15/04/2020 09:50 Certo

    Desde já, muito grato, forte abraço
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Silvio 22/4/2020, 13:24

    Bom dia...

    Poste o que tem feito para uma melhor analise da situação.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 22/4/2020, 16:09

    Grande Sílvio,

    Muito grato por seu interesse no meu problema.
    Sendo mais explícito: este post bem longo foi do amigo Jacir (aqui do forum) pedindo ajuda com uma consulta ou um código. Ajudei-o com uma consulta e ele deu por resolvido. Aí fui tentar fazer via código e nada consegui (sou muito fraco ainda). Como estou tentando aprofundar meus conhecimentos no VBA pedi ajuda. Criei duas tabelas de acordo com as definidas no post de Jacir dentro de um banquinho anexo. A minha consulta que resolve o problema está lá.
    Podes ajudar com o código VBA?
    Queria atualizar campo "Observação" da TabelaRegistroCabecalho para: "Dentro do intervalo": se estiver dentro do intervalo (lógico), caso contrário: "Fora do intervalo".
    Queria atualizar campo "Observação" da TabelaRegistroDetalhes para: "Tem registro": se estiver dentro do intervalo (lógico), caso contrário: "Não tem registro".

    Esses critérios que citei acima são para aprendizado. Ver como faz em uma tabela e na outra.

    Desde já lhe fico muito agradecido.

    Grande abraço.
    Anexos
    [Resolvido]Atualizar campo via VBA AttachmentCatatau.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (562 Kb) Baixado 8 vez(es)
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 24/4/2020, 01:36

    Caros amigos,

    Alguém pode me dar uma luz?

    Muito grato, grande abraço!
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Silvio 24/4/2020, 14:58

    Bom dia...

    Eu já vejo isso, no momento, estou enrolado com 2 clientes aqui, que querem acrescentar mais coisas ao sistema que eu fiz para eles.

    Não me leva a mal, mas já viu, cliente quer atenção total a ele.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 24/4/2020, 16:43

    Grande Sílvio,

    Fica tranquilo, não tem pressa, isso é para aprofundar aprendizado. Sei muito bem quando um cliente pede alguma implementação, é sempre para ontem.

    Sem problemas.

    Grande abraço.
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 27/4/2020, 21:36

    Grande Sílvio,

    Meu amigo, veja se consegue um tempinho para mim. Fico no aguardo.
    Desejaria esse código no puro VBA sem sql para aprofundar conheicimentos.

    Muito grato. Grande abraço.
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 29/4/2020, 14:38

    Grande Sílvio...

    Mestre do puro VBA.

    Abraços

    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Alexandre Neves 30/4/2020, 15:49

    Boa tarde
    Este tema não foi resolvido noutra abordagem?
    Se sim, dê por resolvido e não repita assuntos.


    .................................................................................
    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
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1098
    Registrado : 23/03/2010

    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Finformática 30/4/2020, 16:33

    Caro Alexandre,

    Foi resolvido em parte. Eu que ajudei um amigo e resolvi via consultas. Aqui pedia ajuda para aprender como fazer via código VBA. Vou deixar como resolvido e acompanhar por outro tópico que ajudo terceiros e aprendo como fazer. Com ajuda dos grandes mestres daqui, claro.
    Muito obrigado.

    Abraços.


    Conteúdo patrocinado


    [Resolvido]Atualizar campo via VBA Empty Re: [Resolvido]Atualizar campo via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 18:14