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

    Soma de valores e comparação

    avatar
    kitsuneelt
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 25/08/2014

    Soma de valores e comparação Empty Soma de valores e comparação

    Mensagem  kitsuneelt 16/12/2014, 20:33

    Galera alguém pode dar uma ajuda.

    Tenho as seguintes colunas.

    linha---------Data/Hora----------------Tempo
    1---------11/10/2014  11:15:30----------5
    2---------11/10/2014  11:45:30----------10
    3---------11/10/2014  11:56:30-----------3

    Queria comparar se o TEMPO+DATA/HORA (linha1) < data/hora(linha2)

    E assim sucessivamente, alguém pode dar uma luz no fim do tunel de como fazer isso em SQL ou VBA.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Soma de valores e comparação Empty Re: Soma de valores e comparação

    Mensagem  Alexandre Neves 17/12/2014, 22:49

    Boa noite,
    Teste
    Sub ConfereTempos()
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    ' código criado por Alexandre Neves, do Fórum MaximoAccess '
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    Dim Rst As DAO.Recordset, Tempo As Date
    Set Rst = CurrentDb.OpenRecordset("SELECT * FROM Tabela ORDER BY Linha")
    Do While Not Rst.EOF
    If Rst.AbsolutePosition > 0 And Tempo < DateAdd("n", Rst("Tempo"), Rst("DataHora")) Then MsgBox "A linha " & Rst("Linha") & " deverá ser revista."
    Tempo = DateAdd("n", Rst("Tempo"), Rst("DataHora"))
    Rst.MoveNext
    Loop
    Set Rst = Nothing
    End Sub


    .................................................................................
    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
    avatar
    kitsuneelt
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 25/08/2014

    Soma de valores e comparação Empty loop em VBA para comparar duas colunas da Tabela Dinâmica

    Mensagem  kitsuneelt 7/1/2015, 13:14

    Eu tenho uma aplicação Access e faço algumas consultas, e preciso fazer a comparação de duas colunas em uma tabela dinâmica que vou só explicar abaixo.

    --------Data/Hora----------------------Duracao
    10/12/2014    10:20:20-----------------05
    10/12/2014    10:30:40-----------------10
    10/12/2014    10:42:50------------------3

    Eu quero fazer a comparação destas duas colunas em um loop, exemplo a linha 1 que tem a DURAÇÃO 05 somado com a data/hora 10/12/2014    10:20:20 da mesma linha não pode ser maior ou igual a da linha seguinte 10/12/2014    10:30:40, que na soma iria dar 10/12/2014 10:25:20.

    Essa duração eu altero com uma multiplicação de valores, e não sei quando essa duração passa o tempo da linha seguinte pois tem muitas linhas e é inviável olhar linha por linha, será que alguém pode ajudar em como posso fazer esse loop?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Soma de valores e comparação Empty Re: Soma de valores e comparação

    Mensagem  Alexandre Neves 8/1/2015, 22:36

    Boa noite,
    Fundi os temas
    - Não repita dúvidas
    - Dê continuidade aos assuntos em aberto
    Ajude a manter o fórum organizado, para bem de todos!


    .................................................................................
    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

    Conteúdo patrocinado


    Soma de valores e comparação Empty Re: Soma de valores e comparação

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 20:47