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]Transformar datas em valores numéricos

    avatar
    jbgj
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 29/09/2016

    [Resolvido]Transformar datas em valores numéricos Empty [Resolvido]Transformar datas em valores numéricos

    Mensagem  jbgj 30/9/2016, 13:25

    Bom dia.
    Tenho uma tabela no BD Access que contem dados pessoais. Estou pretendendo criar uma outra tabela relacionada onde fiquem registradas duas datas de eventos, através de um formulário.

    Até aí tranquilo. Minha dificuldade é fazer o seguinte: (Não sei se é possível)

    Quando lançar no formulário a data1 de participação no evento1, quero que compute em outro campo o valor "1"
    Quando lançar no formulário a data2 de participação no evento2, quero que compute em outro campo o valor "0,5"

    E no último campo o total de pontos: Somando os pontos 1 ou 0,5 se tiver.

    Mais ou Menos isso:
    Matricula  Nome  Data1  Data2  ValorData1 ValorData2 TotaldePontos

    Obs.: Preciso fazer uma consulta onde aparece o total de pontos, independente se o membro possui pontos em todos os tipos de evento.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  FabioPaes 30/9/2016, 14:52

    Deixa ver se entendi...



    Se o campo Data1 estiver Preenchido, entao ValorData1=1.0
    Se o Campo Data2 estiver Preenchido, Entao ValorData2 = 0.5


    Se nao estive ValorData1 =0 ...


    Seria isso?


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    jbgj
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 29/09/2016

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  jbgj 30/9/2016, 14:58

    no meu formulário teria dois campos de datas.

    se o membro participar de um evento que valha 1 ponto, eu lançaria no campo data1 e computaria 1 ponto,
    se o membro participar de um evento que valha 0,5 pontos, eu lançaria no campo data2 e computaria 0,5 pontos.

    criando uma tabela com Id numeração automática, esses registros ficariam separados, mas de forma que numa consulta eu pudesse
    ver quantos pontos ele tem no geral.

    Quando não for preenchida algum desses dois campos (Data1 ou Data2), o valor seria zero.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  FabioPaes 30/9/2016, 15:13

    No seu Formulário, no evento apos atualizar do seu Campo Data1 coloque:


    If Nz(Len(Me.Data1.Value)>0) then


    Me.ValorData1 = 1


    end if








    Data1 é o Nome do Campo que recebera a data para computar 1 ponto


    ValorData1 é o Campo que recebera o valor 1 caso seja preenchido o campo Data1






    Esse Campo TotaldePontos é Desnecessário...




    Pois poderá quando precisar apenas calcular com uma formula simples:  =Nz(ValorData1 +ValorData2)


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    jbgj
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 29/09/2016

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  jbgj 30/9/2016, 15:21

    FabioPaes, obrigado pela força!

    Vou criar a tabela/formulario e consulta, baseadas no seu exemplo.

    Depois dou um retorno.

    Grato
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  FabioPaes 30/9/2016, 16:26

    Blz...

    Crie uma consulta em cima da abela, e coloque o Campo Calculado para somar os Pontos...


    No formulário aponte essa consulta como Origem dos dados...

    E coloque  o total de pontos bloqueado, apenas para mostrar a soma...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    jbgj
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 29/09/2016

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  jbgj 30/9/2016, 16:34

    Fiz todo o processo e deu certo.

    Valeu mesmo.

    Só vou acrescentar essa visualização no form e vai ficar dez.

    Abraço até a próxima!!!
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  FabioPaes 30/9/2016, 17:07

    Grato pelo Retorno! Até a Próxima se Deus quiser!

    Nao esquece de Marcar o Tópico como Resolvido!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    jbgj
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 29/09/2016

    [Resolvido]Transformar datas em valores numéricos Empty Re: [Resolvido]Transformar datas em valores numéricos

    Mensagem  jbgj 1/10/2016, 03:38

    Obrigado

      Data/hora atual: 8/12/2022, 00:05