preenchimento automatico de campos em tabela

Olá pessoal,

É minha primeira pergunta neste fórum, peço desculpas adiantadamente caso não me expresse direito.

Estou no meu primeiro projeto VBA para cadastro e controles de contas para pagamento (Luz, tel e agua) de varias unidades da empresa.

Para tanto, tive a ideia de cadastrar uma de cada tipo SOMENTE

Depois, quero fazer um FOR para preencher a tabela (CadContas) apenas os campos (codigo, e datadevencto) do tipo texto para o ano inteiro.

Detalhe apenas o campo (codigo) é chave primaria.

Existe um campo (dia) para o usuario me fornecer o dia que eu quero que se repita nos meses do ano.

Por exemplo:

Dia 10

10/01/2014
10/02/2014
10/03/2014 e assim por diante.....para o ano inteiro ou o restante que falta.

Assim ficará fácil para o mes seguinte o preenchimento da conta, pois estará uma parte já preenchida.

Alguem poderia me ajudar a escrever este codigo ?

Os outros campos, como valor, nome da empresa, acho que não serão necessários por enquanto.

Boa noite, e bem-vindo ao fórum
Coloque o campo datadevencto como tipo data
dim b as byte
for b=1 to 12
currentdb.execute "INSERT INTO CadContas (datadevencto) VALUES #" & FORMAT(DATEserial(year(date),b,NomeSuaCaixaDeTexto) & "#"
NEXT

Olá, obrigado !

Esqueci de um detalhe importante, na verdade eu quero montar uma nova Tabela (PgContas)

Nela constará o campo (codigo, datavencto, datapagto, valor) chaveando o campo (codigo) da tabela CadContas

Assim quando cadastrar um novo tipo de conta, a rotina do vba me preencha essa nova tabela , puxando somente o campo (codigo e datavencto ) deixando em branco os campos datapagto e valor.

O ponto principal é o campo (dia)  pois eu tenho que puxar ele para montar a sequencia corretamente, seria mais ou menos assim:

XX/01/2014
XX/02/2014
XX/03/2014....  etc

Eh meio complicado, por que eu quero colocar um botao no formulario para perguntar: Deseja preencher as contas futuras em branco ?

Abçs

Boa tarde,
Só pelo descrito, não percebi o que tem nem o que pretende
Tem acompanhado o fórum? Tem visto alertas para não adulterar o título?

Oi Alexandre, obrigado pela atenção !!

Já arrumei o titulo.

Na segunda feira mando o bd para que vc dê uma olhada, tenho um antigo para mostrar. Mas para adiantar vou resumir o que pretendo fazer:

-Tenho umas 19 unidades para controlar contas de agua, luz e telefone.
-Todas as unidades recebem e enviam as contas para a matriz para o pagto.
-Em média: telefone umas 50, agua 25, luz 30 e podem chegar mais com o tempo.
-As vezes vem cópia, ou original, as vezes vem os dois (é uma bagunça)
-Já cadastrei os RGI, NRC, Codigo do cliente como PK para checar se as contas são nossas realmente, assim que elas chegam.
-E esse cadastro das contas serve tb, para evitar pagamentos em duplicidade (as vezes eles mandam por email a cta. depois enviam o original)


A minha intenção é "adiantar" "prever" "montar um quadro" para que já fiquem semi-preenchidas as contas dos proximos meses.

Segue anexo o bd que antigo, está diferente das tabelas que mencionei na primeira mensagem.

É só pra voce entender como eu quero que fique, pois estou montando o subformulario no ctrl+c e ctrl+v.

Vlw e até mais.

Obs: Estou tentando anexar o arquivo mas está dando erro !!

Bom dia,
Abri a bd mas não entendi o que pretende alterar ou criar

Então,

Abra o arquivo, escolha qualquer codigo.

- Deverá aparecer todas as contas de janeiro a dezembro. certo ?
- Senão escolha outro
- Eu preenchi, manualmente os campos, copiando e colando.
- Eu gostaria de deixa-los semi-preenchidos, menos o campo valor.

blz ?  Estou mandando outro arquivo.


Abçs.

Bom dia,
Nomeie de forma normalizada
Pode-se criar código para preencher código e Mês que faltarem na sequência do ano em cada código registado. No entanto, o campo Mês é data; qual dia do mês seria preenchido?

Então,

Na tabela CadContas tenho o campo DiaPadrao, para escolha do dia do vencimento por parte do usuario.

Vou montar uma tabela de cadastro depois para ser digitado essa informação.

Estou pensando em algo do tipo:

For 1 to 12

SELECT INSERT INTO......


Mas aí já não consigo terminar de juntar as informação.