Olá, seja bem vindo ao fórum! Se bem entendi, coloque um campo desvinculado no formulário de nome
txtQuantidade por exemplo. Outro campo de nome
txtMaterial e um botão de nome
btnCadastrar.
No evento "Ao clicar" do botão:
- Código:
Dim N As Integer
For N = 1 To Me.txtQuantidade
CurrentDb.Execute "INSERT INTO NomeDaTabela(NumeroPatrimonio, Descricao) VALUES(" & Format(N, "0000") & ", '" & Me.txtMaterial & "')"
Next
Uma pergunta: precisa mesmo cadastrar esse tanto de registros sobre um mesmo material? Não seria suficiente colocar apenas a descrição e a quantidade.
Uma dica: observe os nomes que dei aos campos tanto da tabela quanto do formulário. Quanto mais simples for o nome, melhor. Procure evitar nomes com espaços e com caracteres especiais como
Nº por exemplo. Isso pode lhe trazer grandes dores de cabeça.