Gerar registros na tabela a partir de um periodo

Amigos, estou precisando gerar registros em um tabela no formato mm/aaaa baseado no período inicial e final e contar o número de domingos e feriados do período, exemplo:

Periodo:
Data Inicial: 01/01/2013 Data Final: 31/12/2013

Nesse exemplo deverá gerar os registros da seguinte forma:

Mes/Ano Domingos e Feriados
01/2013 4
02/2013 3
03/2013 4
04/2013 5
05/2013 5
06/2013 4
07/2013 4
08/2013 4
09/2013 5
10/2013 4
11/2013 4
12/2013 5

Desde já agradeço.

Olá, teu pedido de ajuda tá um pouco confuso, o ideal é postar os objetos envolvidos no pedido de ajuda (Formulário e tabela) e explicar detalhadamente a necessidade e os controles envolvidos, lembrando que tem feriado que ocorre também no domingo, nesse ano por exemplo temos: 7 de set, 12 de out e 2 de nov.

Tenho uma tabela denominada "tblmovim" na tabela tenho o campo "periodo" que deverá contem os meses no formato mm/aaaa e o campo "dsr" que deverá conter o número de domingos e feriados no mês, se o domingo for feriado considera a contagem de um, preciso criar um botão que gere os meses no campo "periodo" e número de domingos e feriados no campo "dsr" o período a ser gerado será o informado na caixa desacoplada "data inicial" "data final", exemplo:

data inicial = 01/2013 data final = 04/2013

"periodo" "dsr"
01/2013 4
02/2013 3
03/2013 4
04/2013 5

Só tem um porém ai, essa verificação de domingo e feriados tem que ser feito pelo dia, terias que alterar o formato do campo para dd/mm/yyyy

Veja se neste link te ajuda

Link do forum

Veja se neste link te ajuda

Link do forum

Beto, pode ser no formato dd/mm/aaaa sim, desde que o dia seja sempre 01.

O problema é esse intervalo entre data inicial e data final que queres inserir, pois isso teria que ser feito para uma outra tabela ai a verificação de domingo e feriado fica difícil, imaginava que essa verificação se daria somente nas 2 datas digitadas.

E se criarmos uma tabela temporária para resolver essa questão, ai nessa tabela ficaria todos os dias para apurar os descansos.

Coloca um exemplo do teu projeto para vermos se encontramos uma solução.

Avelino muito obrigado!

É isso mesmo que preciso, porém preciso salvar as informações na tabela, como ficaria o código acrescentando ao invés da lista em uma tabela.

Tentei assim mas cria somente uma linha, ou seja, o primeiro mês.

Código:



Private Sub Comando4_Click()
Dim j, mes, df%, strLista$
mes = Format(Me!DataInicial, "yyyymm")
For j = CDate(Me!DataInicial) To CDate(Me!dataFinal) + 1
    If mes <> Format(j, "yyyymm") Then
        strLista = strLista & Format(j - 1, "mm/yyyy") & vbNewLine
        mes = Format(j, "yyyymm")
        df = 0
    End If
    If Weekday(j) = 1 Then
        df = df + 1
    Else
        df = df + Abs(fncFeriado(j)) & vbNewLine
    End If
Next
Me.mes = strLista
Me.dsrr = df
End Sub