boas
formLancamentoDocumentos na combo de pesquisaNomes tenho o seguinte Código, mas não consigo que mantenha o Número de Fornecedor :
Private Sub pesquisaNome_AfterUpdate()
DoCmd.ApplyFilter , "Numero='" & Me!pesquisaNome.Column(0) & "'"
Me!NumeroFornecedor.SetFocus
Me!pesquisaNome = Null
DoCmd.GoToRecord , , acNewRec
End Sub
Deixo bd para uma melhor compreensão... Obrigado
https://www.dropbox.com/s/55x9r8gdohdkmo9/GesCC%20-%20C%C3%B3pia%20-%20C%C3%B3pia.accdb?dl=0
formLancamentoDocumentos na combo de pesquisaNomes tenho o seguinte Código, mas não consigo que mantenha o Número de Fornecedor :
Private Sub pesquisaNome_AfterUpdate()
DoCmd.ApplyFilter , "Numero='" & Me!pesquisaNome.Column(0) & "'"
Me!NumeroFornecedor.SetFocus
Me!pesquisaNome = Null
DoCmd.GoToRecord , , acNewRec
End Sub
Deixo bd para uma melhor compreensão... Obrigado
https://www.dropbox.com/s/55x9r8gdohdkmo9/GesCC%20-%20C%C3%B3pia%20-%20C%C3%B3pia.accdb?dl=0