Consulta inclusão de datas

eissoaimesmo 14/5/2015, 22:07

eissoaimesmo: Novato; Respeito às regras :

Sexo :
Localização :
Mensagens : 17
Registrado : 25/04/2013

Mensagem nº1

Consulta inclusão de datas

Mensagem eissoaimesmo 14/5/2015, 22:07

Boa noite senhores,

Preciso fazer uma consulta inclusão que insira as datas entre intervalos.
Exemplo inserir datas na tabela entre o dia 1° de maio a dia 31 de maio.
É possível fazer isso atrevas de uma consulta de inclusão ?

Att,
Eissoaimesmo

**Avelino Sampaio** 16/5/2015, 09:09

Avelino Sampaio

Avelino Sampaio: Developer; Respeito às regras :

Sexo :
Localização :
Mensagens : 3883
Registrado : 04/04/2010

Mensagem nº2

Re: Consulta inclusão de datas

Mensagem Avelino Sampaio 16/5/2015, 09:09

Olá!

Vc pode criar um laço com o FOR. Exemplo de um procedimento:

Public Sub fncMontaPeriodo(dtaInicial As Date, dtaFinal As Date)
Dim K
For K = dtaInicial To dtaFinal
CurrentDb.Execute "INSERT INTO NomeTabela (NomeCampo) VALUES ('" & K & "');"
Next
MsgBox "Datas inseridas na tabela...", vbInformation, "Aviso"
End Sub

Sucesso!

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