[Resolvido]Dividir intervalo de datas em períodos por mês

Bom dia a todos,

Peço a vossa ajuda para dividir um registo com intervalo de datas em múltiplos registos por mês, caso o intervalo de datas incluísse mais de 1 mês.

Exemplo, numa tabelaX com os campos:

NOME     DtaInicio      DtaFim

Nome1   02/02/2019   20/02/2019
Nome2   03/04/2019   07/05/2019

Gostaria que uma consulta me dividisse em:

NOME    DtaInicio        DtaFim

Nome1   02/02/2019   20/02/2019
Nome2   03/04/2019   30/04/2019
Nome2   01/05/2019   07/05/2019

Obrigado

boa noite Zé Carlos. Se entendi você quer colocar para separar somente o mês para que ele inclui os dias?
se for assim , no critério da consulta data dataInicio e no critério da  dataFinal, colocando o campo do nome na consulta ele retornará com o nome.

Código:

Como [Digite Mês/Ano - Ex: 06/2019]

Obrigado crysostomo por tentar ajudar..

Não é isso que pretendo.

Pretendo que cada período que inclua mais de um mês seja dividido nos respetivos períodos que corresponde a cada mês.

Elaborei um exemplo do que pretendo para facilitar.

Obrigado

Consegui resolver com a ajuda de Dale Fye, utilizador do forum utteraccess.com.

1º Criar uma tabela "tbl_Numbers" com um único Campo lngNumber com os números de 0 a 99.

Query:

Código:

SELECT tabelaX.Nome
, CDate(IIf(Format(StartDate,"yymm")=Format(DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber],1),"yymm"),[StartDate],DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber],1))) AS PeriodStart
, CDate(IIf(Format(EndDate,"yymm")=Format(DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber]+1,0),"yymm"),[EndDate],DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber]+1,0))) AS PeriodEnd
FROM tabelaX, tlb_Numbers
WHERE ((Format(DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber]+1,0),"yymm"))<=Format([EndDate],"yymm"))
ORDER BY CDate(IIf(Format(StartDate,"yymm")=Format(DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber],1),"yymm"),[StartDate],DateSerial(Year([StartDate]),Month([StartDate])+[lngNumber],1)));

Adaptar os nomes dos campos e respectivas tabelas.

Obrigado

P.S. Adiciono exemplo para que precisar.