[Resolvido]Repetir linhas em uma consulta baseado em determinada quantidade

Olá Pessoal,
Tenho registros que tem uma coluna de quantidade e gostaria de gerar uma consulta que baseado nessa coluna de quantidades  repetissem as linhas na consulta.

Ex. tabela
Registro     Data                                    Defeito          Description                       Inspetor    Quantidade
19097        25/08/2021 17:33:05          AP22-11        Missing Receiver             t.abreu            1
19097        25/08/2021 17:33:05          LC24             PROXIMITY                     t.abreu            1
19097        25/08/2021 17:33:05          AP12-08        Antenna Damaged           t.abreu           5

Nesse caso por exemplo eu precisaria repetir a última linha 5 vezes.
Esses dados serão usados para gerar um relatório que irá imprimir as informações em etiquetas e esse relatório deveria gerar 7 etiquetas mas eu só consegui fazer gerar 3, uma para cada linha.


Mais uma vez obrigado MaximoAccess

Boa tarde
Crie uma tabela espelho. Crie código para recordset ler os registos da primeira tabela e acrescentar tantos quantos os indicados no campo quantidade. A partir daí, tem o resultado na segunda tabela

Grande Mestre Alexandre....
Você é o cara.

Muito obrigado pelo código criado, adaptei no meu BD e estou com problema de "erro 3061 Parâmetros insuficientes. Eram esperado 1".
Pesquisei sobre o erro e fui resolvendo os problemas pois quando rodei o código tinha 7 erros.
Até agora consegui resolver 6 o último estou tentando ainda, o difícil é que não dá para saber onde está o erro.
Mas estou tentando aqui e assim que conseguir resolver, ou não, eu posto aqui.

Att.

Alexandre

Descobri que o erro está acontecendo por eu estar usando uma Consulta como origem dos dados e uma tabela para os registros da etiqueta.
No banco que vc postou vc utilizou tabela como origem dos dados e tabela para os registros da etiqueta.
Acredito ser só um detalhe no código, ou não é possível carregar os dados a partir de uma consulta?

Sobre postar o banco ele é muito grande.

Alexandre boa tarde.

Para ficar mais claro, eu reproduzi o erro que está acontecendo no banco que vc postou, eu não enviei meu banco porque ele é grande e aqui na empresa não consigo fazer upload de arquivos grandes.
As alterações que fiz foram:
1- coloquei mais registros;
2- Adicionei um campo no formulário com o nome de "Registro";
3- Criei uma Consulta que filtra o registro digitado no campo "Registro" do formulário;
4- Alterei o código para ler os valores da Consulta (tudo que era tb_dados alterei para Consulta_tb_dados).


att
MadMax

Ola Alexandre,

Deu certinho como eu queria, único problema era que no meu banco de dados real as informações vinham de várias tabelas, então eu fiz conforme abaixo.
1- Coloquei a consulta em modo design;
2- Cliquei na opção "Criar tabela";
3- Acrescentei no código conforme abaixo;

Código:


    DoCmd.SetWarnings False 'Desabilita os avisos
    DoCmd.OpenQuery "Etq_Consulta_Defeito1", acViewNormal, acReadOnly ' Faz com que a consulta gere a tabela


E assim pude executar o código conforme você fez.
Desculpe o textão, e para ficar bem explicado para consultas futuras.

Obrigado pelo suporte de sempre.
MadMax