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


3 participantes

    [Resolvido] Semestres do ano actual

    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 291
    Registrado : 24/02/2013

    [Resolvido] Semestres do ano actual Empty [Resolvido] Semestres do ano actual

    Mensagem  brunogor 14/3/2015, 11:37

    Viva Senhores,

    Aqui estou eu com mais uma dúvida.

    Após pesquisar aqui no Forum e na NET não encontrei nada.

    Pretendo para um "Campo_Data" numa consulta, colocar um critério de pesquisa para só me retornarem as datas do:
    - 1º semestre do ano actual, ou dos primeiros  6 meses do ano actual;
    - 2º semestre do ano actual, ou dos últimos 6 meses do ano actual.

    Actualmente tenho assim "  >=#01-01-2015# E <#01-07-2015#  " o problema é que quando muda os anos tenho que actualizar manualmente todas as consultas para o novo ano.

    Agradeço antecipadamente a vossa ajuda.

    Cumprimentos

    Bruno Gordino
    ÓscarSantos
    ÓscarSantos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 335
    Registrado : 18/09/2013

    [Resolvido] Semestres do ano actual Empty Re: [Resolvido] Semestres do ano actual

    Mensagem  ÓscarSantos 14/3/2015, 12:36

    Datas no Ms Access

    O mês corrente: DateSerial(Year(Date()), Month(Date()), 1)
    O próximo mês: DateSerial(Year(Date()), Month(Date()) + 1, 1)
    O último dia do mês corrente: DateSerial(Year(Date()), Month(Date()) + 1, 0)
    O último dia do mês seguinte: DateSerial(Year(Date()), Month(Date()) + 2, 0)
    O primeiro dia do mês anterior: DateSerial(Year(Date()), Month(Date()), -1, 1)
    O último dia do mês anterior: DateSerial(Year(Date()), Month(Date()), 0)
    O primeiro dia do trimestre corrente: DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 1, 1)
    O último dia do trimestre corrente: DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 4, 0)
    O primeiro dia da semana corrente (assumindo Domingo = dia 1): Date() - WeekDay(Date()) + 1
    O último dia da semana corrente: Date() - WeekDay(Date()) + 7
    O primeiro dia da semana corrente (usando o padrão da caixa de diálogo Opções): Date() - WeekDay(Date(), 0) + 1
    O último dia da semana corrente: Date() - WeekDay(Date(), 0) + 7
    O Primeiro dia do ano atual: DateSerial(Year(Date()),1,1)

    Mostra o mês anterior, entre o dia 1 e o dia 31 (se existir):

    >=DateSerial(Year(Date());Month(Date())-1;1) And <=DateSerial(Year(Date());Month(Date())-1;31)

    Mostra mês e ano, anterior ao atual;

    Format(DateSerial(Year(Date());Month(Date())-1;1);"mmmm-yyyy")


    .................................................................................
    _________________________________________________________
    sempre a aprender
    para enviar ou postar só access2007 infelizmente é o que tenho no trabalho Sad .
    para dar tópico como resolvido https://www.maximoaccess.com/t860-resolucao-de-topicos
    ÓscarSantos
    ÓscarSantos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 335
    Registrado : 18/09/2013

    [Resolvido] Semestres do ano actual Empty Re: [Resolvido] Semestres do ano actual

    Mensagem  ÓscarSantos 14/3/2015, 12:41

    Tenta :

    Expr1:ano([seucampo])

    Abraco


    .................................................................................
    _________________________________________________________
    sempre a aprender
    para enviar ou postar só access2007 infelizmente é o que tenho no trabalho Sad .
    para dar tópico como resolvido https://www.maximoaccess.com/t860-resolucao-de-topicos
    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 291
    Registrado : 24/02/2013

    [Resolvido] Semestres do ano actual Empty Semestres do ano

    Mensagem  brunogor 14/3/2015, 15:41

    Viva Oscar,

    Se calhar expliquei-me mal.

    As expressões que me passou são muito úteis, no entanto, não me parece que alguma possibilite a extracção dos primeiros meses ou dos últimos meses do ano actual.

    A expressão " ano([campo_data]) " só mostra o ano do campo.

    Obrigado na mesma.

    Bruno Gordino


    Última edição por brunogor em 14/3/2015, 20:06, editado 2 vez(es)
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido] Semestres do ano actual Empty Re: [Resolvido] Semestres do ano actual

    Mensagem  Silvio 14/3/2015, 19:07

    uma luz..

    DataDoPedido< Data() - 30 Usa a função Date para exibir os pedidos com mais de 30 dias.

    DataDoPedidoYear([DataDoPedido])=2007 Usa a função Year para exibir os pedidos com datas do pedido em 2007.

    DataDoPedido DatePart("q", [DataDoPedido])=4 Usa a função DatePart para exibir os pedidos do quarto trimestre do calendário.


    DataDoPedidoDateSerial(Year ([DataDoPedido]),Month([DataDoPedido])+1, 1)-1 Usa as funções DateSerial, Year e Monthpara exibir os pedidos do último dia de cada mês.

    DataDoPedidoYear([DataDoPedido])= Year(Now()) And Month([DataDoPedido])= Month(Now()) Usa as funções Year e Month e o operador And para exibir os pedidos do ano e mês atuais.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    brunogor
    brunogor
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 291
    Registrado : 24/02/2013

    [Resolvido] Semestres do ano actual Empty Semestres do ano actual

    Mensagem  brunogor 14/3/2015, 19:44

    Viva mais uma vez,

    Valeu Sílvio e Óscar.

    Aproveitei a dica para exibir os pedidos do quarto trimestre do calendário " DatePart("q", [DataDoPedido])=4 ".

    Para o primeiro semestre usei:
    PartData("q";[IT_Plano_DataProximaEfectiva])=1
    PartData("q";[IT_Plano_DataProximaEfectiva])=2

    Depois para o ano actual usei:
    Ano(Data())

    Mais uma vez obrigado Sílvio e Óscar.

    Cumprimentos

    Bruno Gordino
    ÓscarSantos
    ÓscarSantos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 335
    Registrado : 18/09/2013

    [Resolvido] Semestres do ano actual Empty Re: [Resolvido] Semestres do ano actual

    Mensagem  ÓscarSantos 14/3/2015, 20:13

    Obrigado pelo retorno. O forum agradece.

    Avraco


    .................................................................................
    _________________________________________________________
    sempre a aprender
    para enviar ou postar só access2007 infelizmente é o que tenho no trabalho Sad .
    para dar tópico como resolvido https://www.maximoaccess.com/t860-resolucao-de-topicos

    Conteúdo patrocinado


    [Resolvido] Semestres do ano actual Empty Re: [Resolvido] Semestres do ano actual

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 01:52