[Resolvido]calculo de data agora+prazo no formulario

marina Gomes 19/3/2017, 16:59

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº1

[Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 19/3/2017, 16:59

Boa Tarde
Gostaria de uma ajuda sobre um calculo de data: EM ATRASO=Data()-[PrazoEntrega]; que me dá os dias em atraso. Ma quero acrescentar neste mesmo lugar, que ele para de contar a partir do momento da entrega (data)DatasRecebimento.
Como faço
Atenciosamente
Marina

**Alexandre Neves** 19/3/2017, 20:22

Alexandre Neves

Alexandre Neves: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 8449
Registrado : 05/11/2009

Mensagem nº2

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Alexandre Neves 19/3/2017, 20:22

Boa noite,

If IsNull(DatasRecebimento) then EmAtraso=Date()-PrazoEntrega Else EmAtraso=0

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

marina Gomes 20/3/2017, 18:30

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº3

calculo de data agora+prazo no formulario

Mensagem marina Gomes 20/3/2017, 18:30

oi. Boa tarde
Não consegui que desse o resultado, ele não parou de contar, este código é pra colocar em eventos construtor de código, ou dados fonte de controle?

**Alexandre Neves** 20/3/2017, 20:36

Alexandre Neves

Alexandre Neves: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 8449
Registrado : 05/11/2009

Mensagem nº4

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Alexandre Neves 20/3/2017, 20:36

Boa noite
Esse código pode ser colocado no código do evento que pretender

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

marina Gomes 21/3/2017, 18:20

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº5

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 21/3/2017, 18:20

Oi, Boa Tarde

coloquei no Evento ao carregar o formulário

Private Sub Form_Load()
Me.Empenho_nº.SetFocus
If IsNull(DatasRecebimento) Then txt_EM ATRASO = Date - PrazoEntrega Else txt_EM ATRASO = 0
End Sub

mas esta dando este erro de compilação 'sub' ou Function" não definida

Assis 21/3/2017, 18:41

Assis

Assis: Maximo VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009

Mensagem nº6

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Assis 21/3/2017, 18:41

Marina

A diferença a vermelho ... Date()

.................................................................................
*** Só sei que nada sei ***

marina Gomes 22/3/2017, 10:39

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº7

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 22/3/2017, 10:39

Oi, Bom dia
Coloco os Date() mais ao fechar para concluir ele sai, não fica.

If IsNull(DatasRecebimento) Then txt_EM ATRASO = Date() - PrazoEntrega Else txt_EM ATRASO = 0

ele volta

Private Sub Form_Load()
If IsNull(DatasRecebimento) Then txt_EM ATRASO = Date - PrazoEntrega Else txt_EM ATRASO = 0
End Sub

e da esse erro de compilação 'sub' ou 'Function' não definida.

Anexos

Sistema Penalidade.zip: Você não tem permissão para fazer download dos arquivos anexados.; (842 Kb) Baixado 12 vez(es)

Última edição por marina Gomes em 23/3/2017, 09:06, editado 1 vez(es)

Assis 22/3/2017, 11:26

Assis

Assis: Maximo VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009

Mensagem nº8

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Assis 22/3/2017, 11:26

Marina

Quer postar só esse formulário e a tabela/consulta que o alimenta.

Aguardo

.................................................................................
*** Só sei que nada sei ***

marina Gomes 23/3/2017, 09:13

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº9

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 23/3/2017, 09:13

oi, Bom dia
Enviei os arquivos, o formulário que uso este sistema de data é o formulário Empenho. Que preciso do calculo.
Obrigado pela ajuda.
Tenha um bom dia
Marina

Assis 23/3/2017, 11:52

Assis

Assis: Maximo VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009

Mensagem nº10

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Assis 23/3/2017, 11:52

Marina

Não vejo qual é é o campo " DatasRecebimento "

Aguardo

.................................................................................
*** Só sei que nada sei ***

marina Gomes 23/3/2017, 14:29

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº11

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 23/3/2017, 14:29

Oi, é em txt_EM ATRASO, ele está com esta formula =Data()-[PrazoEntrega], que esta fazendo a contagem direta de dias em atraso, que é a data de hoje menos o prazo que a empresa teria de entregar, mas quando á a entrega que é a data da entrega que insiro no formulário detalhe de entrada no campo DatasRecebimento, queria uma formula para zerar e não continuar contando.
obrigado, pela atenção

Assis 23/3/2017, 18:45

Assis

Assis: Maximo VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009

Mensagem nº12

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Assis 23/3/2017, 18:45

Marina
Teste

.................................................................................
*** Só sei que nada sei ***

marina Gomes 25/3/2017, 09:25

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº13

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 25/3/2017, 09:25

Bom dia;
Obrigado pela ajuda, ficou ótimo.
Parabéns, vocês são ótimos
Valeu

Assis 25/3/2017, 11:33

Assis

Assis: Maximo VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009

Mensagem nº14

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Assis 25/3/2017, 11:33

Obrigado pelo retorno

Veja aonde estava a errar

Marina
If IsNull(DatasRecebimento) Then txt_EM ATRASO = Date - PrazoEntrega Else txt_EM ATRASO = 0

Código do Alexandre Neves
If IsNull(DatasRecebimento) Then [txt_EM ATRASO] = Date - PrazoEntrega Else [txt_EM ATRASO] = 0

a diferença é quando o nome do campo tem um espaço, tem de o colocar dentro de [ ]

Bom fim de semana

.................................................................................
*** Só sei que nada sei ***

marina Gomes 25/3/2017, 23:15

marina Gomes

marina Gomes: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 33
Registrado : 09/02/2017

Mensagem nº15

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem marina Gomes 25/3/2017, 23:15

Pra voce também, muito obrigado pela orientação e ajuda eficaz.

Conteúdo patrocinado

Conteúdo patrocinado

Conteúdo patrocinado

Mensagem nº16

Re: [Resolvido]calculo de data agora+prazo no formulario

Mensagem Conteúdo patrocinado

MaximoAccess

MaximoAccess

MaximoAccess

[Resolvido]calculo de data agora+prazo no formulario

[Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Re: [Resolvido]calculo de data agora+prazo no formulario

Tópicos semelhantes

Tópicos semelhantes

Pesquisar

Resultados por: Mensagens Tópicos
Pesquisa avançada