[Resolvido]Criar varias linhas na consulta SQL

Bom dia a todos,

Estou precisando de uma ajudinha.

Tenho uma tabela de estoque com os seguinte campo:
DESCRICAO
COD#REG
COD#FABRICANTE
MARCA
QTDE

eu preciso criar uma consulta SQL temporário da seguinte forma:
PARAFUSO 6X40, 25482, 601501, JACTO, 5
ARRUELA 6MM, 4215, 501458, AGCO, 3

esta consulta é somente para criar etiquetas apartir do campo QTDE.
então qdo a consulta executar precisaria que aparecesse 5 linhas assim:
PARAFUSO 6X40, 25482, 601501, JACTO, 1
PARAFUSO 6X40, 25482, 601501, JACTO, 1
PARAFUSO 6X40, 25482, 601501, JACTO, 1
PARAFUSO 6X40, 25482, 601501, JACTO, 1
PARAFUSO 6X40, 25482, 601501, JACTO, 1
ARRUELA 6MM, 4215, 501458, AGCO, 1
ARRUELA 6MM, 4215, 501458, AGCO, 1
ARRUELA 6MM, 4215, 501458, AGCO, 1

Sei que não é facil.

Bom dia Leone, seja bem vindo ao Fórum!

Para que vais utilizar esta consulta?


cumprimentos.

Segundo Ensinamentos do Mestre Alexandre Neves...

Para criar consulta, utilize

para aparecer no Access

    Dim Consulta As DAO.QueryDef
    Set Consulta = New DAO.QueryDef
    
    CurrentDb.QueryDefs.Delete "Test"
    Consulta.Name = "Test"
 
   Consulta.SQL = "SELECT SuaTabela.SeuCampo, SuTabela.SeuCampo1 FROM SuaTabela;"
    CurrentDb.QueryDefs.Append Consulta
    

Para não aparecer:

Dim Consulta As DAO.QueryDef
    Set Consulta = New DAO.QueryDef
    
    CurrentDb.QueryDefs.Delete "Test"
    Consulta.Name = "Test"
 
   Consulta.SQL = "SELECT SuaTabela.SeuCampo, SuTabela.SeuCampo1 FROM SuaTabela;"
    
    Set Consulta = Nothing

Cumprimentos.

essa consulta é para expandir os produto, para que eu possa imprimir etiquetas, ex: eu recebo uma nf com varios produto de qtdes diferente, todos os produtos tem que ter etiquetas, a tabela que eu tenho é somente os dados da nf, por isso preciso expandir em uma consulta e depois eu abro o relatorio ja configurado as etiquetas.