[Resolvido]Inserir Registos automaticamente entre 2 tabelas

Tenho tres tabelas uma delas tem 11 códigos e respeita a 11 freguesias. Outra tem 21 códigos respeitantes a 21 secções de voto e outra com 8 códigos que numera essas mesmas secções (Secção 1, secção 2, secção 3, etc...). Uma freguesia pode ter 7 secções de voto, numneradas de 1 a 7, outra pode ter só uma secção, outra pode ter 4 secções, não tem numeros fixos. Pretendia se fosse possivel, através de formulário, indicar o n.º de secções de voto de cada freguesia e automaticamente acrescentar na tabela secções de voto os respectivos numeros, criando as linhas necessárias para tal, por exemplo: Ao escolher a freguesia 1, com 4 secções, me acrescentasse na tabela a secção 1, secção 2, secção 3 e secção 4. Não sei se me fiz entender ?
Aguardo. Obrigado

É possível sim. Você pode usar a instrução Do While ou For. Aqui no forum tem tópicos que tratam sobre o assunto. Essa semana mesmo foi resolvido um sobre.

Não consigo encontrar, será que poderá dar uma dica.
Obrigado

Uma maneira de ser fazer isso pode ser assim:

Dim NReg As Integer
For NReg = 1 To Me.txtQtd
CurrentDb.Execute "INSERT INTO NomeTabela(Código) Values('" & NReg & "');"
Next NReg

No caso acima, se o campo txtQtd tiver o número 4, serão acrescentados 4 registros com os códigos de 1 a 4.

Sou principiante, pode ser um pouco mais explicito, por favor
Obrigado

É só colocar esse código no evento "Ao clicar" de um botão e substituir o termo NomeDaTabela pelo nome da sua tabela. Nesse exemplo que postei, se o campo do formulário tiver o número 4, serão inseridos quatro registros na tabela, cada um com o seu número:

1
2
3
4

1, 2, 3 e 4 é o número do código chave primária.

Como vi que quase todos seus controles e elementos não estão devidamente nomeados, peço que leia esse pequeno artigo para entender porque se deve ter um cuidado especial com esse nomes:
http://maximoaccess.forumeiros.com/t1162-dicas-para-iniciantes-nomear-campos-e-elementos-de-um-sistema-em-access

Obrigado amigo Criquio, assunto resolvido.
Um abraço

Agradecemos pelo retorno. Tenha uma boa tarde!