MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Atualizar Qtde dias tabela Access

    Compartilhe

    Helciomg
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 24/05/2011

    Atualizar Qtde dias tabela Access

    Mensagem  Helciomg em Ter 21 Mar 2017, 22:50

    Tenho uma tabela com alguns nomes de pessoas que trabalharam ao longo do mês com os campos Nome e Login (que são únicos) e a data do trabalho.
    Esta tabela está ordenada pelo Nome (crescente) e pela Data (Crescente).

    Eu preciso colocar ao lado do campo Data o Nº do dia trabalhado.
    Por exemplo, o fulano trabalho nos dias 01, 02, 04, 05, 06 e 07 de março. Então tenho que atualizar o campo dia conforme abaixo:
    Data          - Dia
    01/03/2017 - 1
    02/03/2017 - 2
    04/03/2017 - 3
    05/03/2017 - 4
    06/03/2017 - 5
    07/03/2017 - 6

    Ao mudar o nome, preciso recomeçar o dia do 1 e ir aumentando em sequência (1+1) até a última ocorrência e fazer um loop em toda a tabela.

    Qual a melhor forma de conseguir isso?

    Obrigado!
    avatar
    Julio Lustosa
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    Re: Atualizar Qtde dias tabela Access

    Mensagem  Julio Lustosa em Qua 22 Mar 2017, 17:20

    Você pode usar o DCount, e quando obter o resultado, acrescente + 1. Exemplo:

    i = DCount("Nome","Trabalho","Nome='" & Me.Nome & "'") + 1

    É uma forma mais simples de resolver. Ele sempre vai contar quantos dias ele já trabalhou e depois acrescenta mais um dia. Ele não verifica se os dias informados na coluna da tabela estão certos, somente conta e acrescenta.

    Abraços.

      Data/hora atual: Ter 21 Nov 2017, 10:14