boas
Não consigo que a combo após pesquisa retorne os Dados Inseridos.
Codigo Utilizado :
Private Sub ComboMTTipo_AfterUpdate()
DoCmd.ApplyFilter , "Empresa = """ & Me!ComboMTTipo.Column(0) & """"
Me!Empresa.SetFocus
Me!ComboMTTipo = Null
End Sub
Deixo base_de_dados - form Tipo_Medecina_Trabalho - Combo ComboMTTipo
Link : https://www.dropbox.com/s/vah22a8yd9mi65h/GerHumanos%20-%20MedTrabalho.rar?dl=0
Não consigo que a combo após pesquisa retorne os Dados Inseridos.
Codigo Utilizado :
Private Sub ComboMTTipo_AfterUpdate()
DoCmd.ApplyFilter , "Empresa = """ & Me!ComboMTTipo.Column(0) & """"
Me!Empresa.SetFocus
Me!ComboMTTipo = Null
End Sub
Deixo base_de_dados - form Tipo_Medecina_Trabalho - Combo ComboMTTipo
Link : https://www.dropbox.com/s/vah22a8yd9mi65h/GerHumanos%20-%20MedTrabalho.rar?dl=0