[Resolvido]Abrir o registro correspondente ao clicar duas vezes na ListBox

Boa tarde a todos.
Mais uma vez recorro aos amigos para solucionar um problema que não consegui resolver porque meus conhecimentos de VBA são bastante precários.
O BD em anexo terá a função de Controlar o fluxo de veiculos de uma secretaria de saude.
No formulario principal (Fml_Veiculo) tem um Subformulario (SubFml_Viagem) e uma ListBox (CxLis_VeiculosEmUso).
Nessa caixa de listagem ficam exibidas as viagens ainda não finalizadas com a Data de Retorno. Eu gostaria que ao clicar em uma linha da ListBox, o formulario (o mesmo que está aberto) exibisse o registro correspondente (o Veiculo usado e a Viagem correspondente). Encontrei alguns códigos que ensinam a abrir OUTRO FORMULARIO nesse registro, mas o que quero é abrir nesse mesmo formulario.
Abaixo envio o BD para me ajudarem nesse código.

Obrigado.

Olá.
Um outro problema que está ocorrendo é que quando clico no botão EXCLUIR ele não exclui e dá a mensagem que não há nenhum registro a ser excuido....

Olá, Boa noite.
Continuo procurando uma solução. Algumas pessoas baixaram o arquivo anterior, mas ninguém apresentou uma sugestão. Fiz várias modificações no BD, até mesmo na estrutura das tabelas e dos relacionamentos.
Mesmo assim não consegui uma forma de: MOSTRAR NO FORMULÁRIO O REGISTRO QUE SELECIONO OU DOU DUPLO CLICK NA LISTBOX QUE ESTÁ NO MESMO FORMULÁRIO.
Vi alguns exemplos no Forum, mas não consegui adapta-los para o meu BD.
Continuo aguardando a ajuda de vocês. Acredito que seja um código simples a se colocar no evento Ao Clicar Duas Vezes  da ListBox.

Coloco anexo da nova versão do BD e deixo meus antecipados agradecimentos.

Boa Noite Walter,

Sim. É simples.

No duplo clique da listbox, insira o seguinte código:

Código:



Private Sub ListBox_CarrosEmUso_DblClick(Cancel As Integer)
'    Me.CodigoViagem = Me.ListBox_CarrosEmUso
   
    Me.Filter = "[CodigoViagem] = " & Me.ListBox_CarrosEmUso.Column(3) & ""
    Me.FilterOn = True
    Me.Requery



End Sub




É isso!!

Boa sorte

[]'s

FIM

Muito obrigado pela atenção, Alexandre.

Esse código gerou um erro na primeira linha:



"Voce não pode atribuir um valor a este objeto"


O que pode estar errado?

Walter,

Segue arquivo onde fiz o ajuste. Ta funcionando normalmente.

[]'s

FIM

Perfeito, Alexandre.

Funcionou direitinho. Deu errado aqui por causa daquela primeira linha que estava "comentada" e não era para ser incluida.
O erro foi meu.

Fico muito agradecido.

Tenha uma boa noite.

Walter