[Resolvido]Consulta devolvendo registos com campos vazios e registos anteriores

Boa tarde a todos agradeço pela colaboração neste excelente forum...

Minha dúvida é a seguinte...tenho uma tabela com seguintes valores.

coluna 1 coluna 2 coluna 3
4451-20 4451-20 Matematica
4452-21
4461-22 Matematica geral


Gostaria em uma consulta para gerar relatorio

que separasse os dados e me mostrasse em uma lista enorme de dados a seguinte informação separada.

nota que a segunda linha eu tenho so o codigo e nao tenho a descrição da coluna 3 ...que é o noe do livro. e as outras eu tenho as informações. Se eu quiser procurar numa estante o livro nao vou achar so com o codigo. entao pra saber sua localização preciso que apareça na consulta a linha de cima com codigo 4451-20 , a linha que nao tem a decrição com codigo 4452-21 e a linha abaixo com código 4461-22,,,como é uma sequencia dara pra eu localizar sabendo os livros antes e depois do que esta vazio ...e lançar no sistema.


Obrigado

Boa tarde!

Segue a imagem do que eu necessito. Queria que em uma lista (que se encontra no BD) que filtrasse estes dados ilustrado na imagem.

Segue o arquivo BD.

No outro tópico, coloquei uma imagem como exemplo, gostaria realizar a consulta de acordo com a img postada.

Porque no meu BD a consulta é realizada através de critérios de ordenação entre duas tabelas,,,onde o Camp1 (coletor) ordena com o Codbarras (ALeph, trazendo uma consulta onde tem campos em codbarras em branco,,,por isso quero que além de aparecer o codbarras em branco (neste caso poderia colocar apenas o critério é nulo que iria resolver, só que me traria somente em codbarras a linhas em vazias, porém preciso do codbarras anteriormente preenchida. Então toda vez que deparar com campo vazio em COdbarras me traga a anterior preenchida tb...e não toda a relação.

É meio complicado explicar,,,,por isso a postei a img do que necessito e o BD tb.

Grato

Amigo, também achei confuso, o ideal é filtrar por Número, Código, data, etc.

Gleison,
Crie uma tabela vazia TabelaFiltrada com os campos Identificação, Campo1, CODBARRAS, AUTOR
cole o código seguinte num módulo e execute-o
Sub CriaTabelaFiltrada()
Dim AnteriorNulo As Boolean, Rst1 As DAO.Recordset, Rst2 As DAO.Recordset
Set Rst1 = CurrentDb.OpenRecordset("SELECT Coletor.Identificação, Coletor.Campo1, ALEPH.CODBARRAS, ALEPH.AUTOR FROM Coletor LEFT JOIN ALEPH ON Coletor.Campo1 = ALEPH.CODBARRAS ORDER BY Coletor.Identificação;")
CurrentDb.Execute "DELETE * FROM TabelaFiltrada"
Set Rst2 = CurrentDb.OpenRecordset("SELECT * FROM TabelaFiltrada;")
Do While Not Rst1.EOF
If (IsNull(Rst1(3)) Or Rst1(3) = "") And Not AnteriorNulo Then
AnteriorNulo = True
Rst1.MovePrevious
Rst2.AddNew
Rst2(0) = Rst1(0): Rst2(1) = Rst1(1): Rst2(2) = Rst1(2): Rst2(3) = Rst1(3)
Rst2.Update
Rst1.MoveNext
Rst2.AddNew
Rst2(0) = Rst1(0): Rst2(1) = Rst1(1): Rst2(2) = Rst1(2): Rst2(3) = Rst1(3)
Rst2.Update
ElseIf (IsNull(Rst1(3)) Or Rst1(3) = "") Then
AnteriorNulo = True
Else
AnteriorNulo = False
End If
Rst1.MoveNext
Loop
Set Rst1 = Nothing:Set Rst2 = Nothing
End Sub

Obterá o resultado na tabela e ordene-a pelo campo Identificação

Muito Obrigado, pela sua dedicação e paciência.

Deu super certo, vc é o Mestre no ACCESS, sem palavras pra agradecer.

Super feliz!

Bom dia, Gleison

Quando não se desiste, chega-se aonde é preciso
Vou adequar o título, porque na altura que o fiz não tinha a certeza do que era adequado.