[Resolvido] Função =Dpesquisa ou =DLook

[Alan Rodrigo 0]

Boa tarde,

Alguém tem algum exemplo que utiliza Função =Dpesquisa ou =DLook

[Alan Rodrigo 0]

Pessoal,

 

Consegui utilizar a função em um formulário. No entanto, quando tento utilizar a mesma função no mesmo formulário, mas este como subformulário de outro, não consigo. Aparece o erro de que não consegue localizar o subformlário.

Já tentei de várias maneiras, incluir na função que o registro de busca estará em um subformúlário, mas até agora não consegui. Vocês poderiam me ajudar!

A função que incluí é a seguinte:

 

Private Sub Setor_Enter()
Setor = DLookup("[Setor]", "[Setor]", "[CódLocal] = '" & Forms!SubFormulárioCadastrodeColaborador!CódLocal & "'")
End Sub

O subformulário ficará dentro do formulário: FormulárioCadastrodeColaborador, segue arquivo para download. (http://questaotrabalhista.com/download/BancodeDados.accdb)

 

Desde já agradeço.

[Alan Rodrigo 0]

Pessoal,

 

Consegui utilizar a função em um formulário. No entanto, quando tento utilizar a mesma função no mesmo formulário, mas este como subformulário de outro, não consigo. Aparece o erro de que não consegue localizar o subformlário.

Já tentei de várias maneiras, incluir na função que o registro de busca estará em um subformúlário, mas até agora não consegui. Vocês poderiam me ajudar!

A função que incluí é a seguinte:

 

Private Sub Setor_Enter()
Setor = DLookup("[Setor]", "[Setor]", "[CódLocal] = '" & Forms!SubFormulárioCadastrodeColaborador!CódLocal & "'")
End Sub

O subformulário ficará dentro do formulário: FormulárioCadastrodeColaborador, segue arquivo para download. (http://questaotrabalhista.com/download/BancodeDados.accdb)

 

Desde já agradeço.

 

 

Já consegui resolver,

Obrigado.