[Resolvido]Preencher com os dados da list

Bom dia pessoal,tenho esse exemplo de OS que o amigo Alexandre desenvolveu,e quero que ao clicar 2 vzs na list do "frmSubManutencao"preencher os campos acima com os mesmos dados.
Abçs.

Kaynan, inclua o campo id_manut na fonte de Registro do subformulário, conforme abaixo:


Em seguida, no evento Ao Clicar Duas Vezes na lista "lstManut", copie e cole o seguinte código:

Private Sub lstManut_DblClick(Cancel As Integer)

'-- filtra os dados do formulário através do id_manut da listbox (coluna 0, escondida)
Me.Filter = "[id_manut] = " & Me.lstManut.Column(0) & ""
'-- aplica o filtro
Me.FilterOn = True
'-- atualiza subformulário
Me.Refresh

End Sub

É isso

Att,

Alexandre Fim

Opaa,funcionou em partes Alexandre,eu abro a OS e cadastro o equipamento,preencho todos os campos e gravo,depois vou em manutenção preencho os campo e gravo.
Mas se eu clico na aba equipamentos pra escolher outro equipamento da essa mensagem.

Kaynan,

Vou ajustar esse problema e te mando nova versão.
Esse erro é gerado pq na guia de Manutenção, quando há o cadastro do registro, o Access diz que vc é obrigado a informar o Tipo de Serviço, por causa do relacionamento na tabela, que garante a integridade referencial.
Mas vou mudar essa lógica e ai não vai gerar mais erro.

Aguarde.

Att,

Alexandre Fim

Ok blz.

Fechando.