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


5 participantes

    [Resolvido]datainicial+periodo=datafinal

    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty datainicial+periodo=datafinal

    Mensagem  Traxman 22/5/2013, 13:52

    Bom dia amigos!
    Bem, cá estou eu novamente a solicitar vossos auxilios...
    Tentei encontrar alguma solução (exemplo) no forum porém não tive êxito.
    Tenho um campo "dataincial" e um outro "periodo", sendo que quando insiro a data inicial e o periodo (em meses) em um terceiro campo ("datafinal") deve aparecer o resultado. Porém quando insiro ex: "01/01/2012" e "12" (meses) o resultado é 27/12/2012, porém deveria ser "01/01/2013", como ajustar (pois alguns meses tem 30 dias e outros 31 - sem contar quando o ano é bisexto)?
    Juliano Lima
    Juliano Lima
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 13/12/2011

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Juliano Lima 22/5/2013, 14:52

    É muito Simples amigo !

    Use a formula:
    DateAdd("d",campodemeses,suaDATAinicial)
    ex: DateAdd("d",25,01/01/2013) = 26/01/2013

    SUBSTITUA "d" por "m" para somar MESES ou "a" para anos.
    DateAdd("m",campodemeses,suaDATAinicial)
    ex: DateAdd("d",2,01/01/2013) = 01/03/2013

    A estrutura continua a mesma.

    Resolvido ?

    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 22/5/2013, 16:06

    Colocado da senguinte forma, mas da erro:

    Private Sub DataFinal_AfterUpdate()
    DateAdd("m",[periodo]+[datainicial])
    End Sub

    mensagem: "erro de compilação: era esperado: ="
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Marcelo David 22/5/2013, 17:09

    Terá que passar o resultada para algum, local, uma variável ou um campo, tipo:

    Me!SeuCampo = DateAdd("m",[periodo]+[datainicial])


    .................................................................................
    [Resolvido]datainicial+periodo=datafinal Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]datainicial+periodo=datafinal Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]datainicial+periodo=datafinal Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]datainicial+periodo=datafinal Marcel11
    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 22/5/2013, 18:36

    Obrigado Marcelo!

    Mas ainda não deu nenhum resultado, ainda sem funcionar.
    Juliano Lima
    Juliano Lima
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 13/12/2011

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Juliano Lima 22/5/2013, 18:50

    Select DateAdd("m";[periodo];[datainicial]), Nome, Endereco
    From Cad_Registros;

    Era pra ser um SELECT, além disso voce adicionou um "+" que nunca existiu na formula...kkkkkk

    DateAdd em Ingles
    SomData em Portugues....

    Tenta direitinho de novo

    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 22/5/2013, 19:45

    juliano...
    Sou meio noob no assunto, poderia me explicar o que seria este "nome" e "endereço" ?
    Juliano Lima
    Juliano Lima
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 13/12/2011

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Juliano Lima 22/5/2013, 20:31

    Era só um exemplo...
    Mas vamos as explicações mais básicas então:

    Eu fiz uma consulta em modo DESIGN no meu BD(Parecido com o seu), você vai achar a seguinte imagem:
    [Resolvido]datainicial+periodo=datafinal 79276559

    Repare que eu tenho um campo de DATA na minha consulta.
    Sua dúvida é "Como adicionar uma quantidade de MESES na minha data"

    Pois bem, utilize a formula abaixo
    [Resolvido]datainicial+periodo=datafinal 19874293

    Quando você executar a formula, você terá o seguinte resultado:
    [Resolvido]datainicial+periodo=datafinal 25818715
    Repare que um novo campo foi criado com uma Nova data, somando os Meses, ignorando os 31 ou 30 dias..


    Como você quer somar Meses que você deseja digitar, no seu formulário, você pode colocar a mesma formula em uma caixa de texto. O importante é você entender como ela funciona, o resto você consegue fazer sozinho
    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 23/5/2013, 19:19

    Olha, confesso, tentei de várias formas usar a formula em questão, porém não obtive êxito. Se alguém tiver uma nova sugestão fico agradecido.
    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]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Alexandre Neves 23/5/2013, 19:46

    Boa tarde,
    Tem 3 campos na tabela (DataInicial, Periodo e DataFinal)? Não deve armazenar campos calculados, a menos que seja indispensável.
    Quanto ao cáculo, utilize DateAdd("m",intMeses,DataInical)


    .................................................................................
    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
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Avelino Sampaio 24/5/2013, 12:33

    Experimente usando o evento "Após atualizar" da campo Periodo

    Private Sub Perido_AfterUpdate()
    me!DataFinal = DateAdd("m",me!periodo,me!datainicial)
    End Sub


    Eu sugiro muito que vc faça uma leitura deste meu artigo, para vc poder saber como esscrever corretamente os nomes do campos no VBA

    http://www.usandoaccess.com.br/tutoriais/tuto52.asp?id=1#inicio

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    Juliano Lima
    Juliano Lima
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 13/12/2011

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Juliano Lima 24/5/2013, 12:41

    Esse tópico já deveria ter sido resolvido, não entendo onde ele enfrenta dificuldade, acho que o ideal seria postar o exemplo dele pra gente poder visualizar onde existe essa demanda
    avatar
    Traxman
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 24/5/2013, 19:27

    Resolvido.

    O erro era uma letra no lugar errado, no campo datanicio.

    Obrigado pela paciência e ajuda de todos.
    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]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Alexandre Neves 24/5/2013, 19:37

    [Resolvido]datainicial+periodo=datafinal MaximoAccess%20ResolvidoMarcado


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 03/01/2012

    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Traxman 24/5/2013, 19:38

    Resolvido.

    Conteúdo patrocinado


    [Resolvido]datainicial+periodo=datafinal Empty Re: [Resolvido]datainicial+periodo=datafinal

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 12:17