[Resolvido]Como verificar se um controle de outro form está ativo/existe

Tenho um controle chamado BuscarProd que existe em vários forms e quero carregar ele com um valor de um form POP clicando duas vezes sobre o controle e aí carrega o valor em BuscarProd, porém este form POP é uma consulta cruzada e pode ser aberto em qualquer lugar do sistema através de CTRL+2, porém se o usuário clicar duas vezes quando estiver com o form ao "pai" que não tenha o campo vai dar erro... Então preciso colocar uma condição de saber de o controle está ativo eu resolvo isso... o que facilita é que tenho um form principal (Main_Menu) que possui um subform (SubFormAplicacao) onde carrego os forms com Parent.SubFormAplicacao.SourceObject... então a condição é sempre verificar se Forms!Main_Menu!SubFormAplicacao.Form!BuscarProd está ativo...

Acredito que pela imagem anexa é possível entender com mais clareza...


Código no form POP:
Private Sub Produto_DblClick(Cancel As Integer)

   If condição??? Then
       Forms!Main_Menu!SubFormAplicacao.Form!BuscarProd = Me.Produto
       Forms!Main_Menu!SubFormAplicacao.Form!OEM.Value = Null
       Forms!Main_Menu!SubFormAplicacao.Form!CR.Value = Null
   End If
       
End Sub

Bom dia,
If CurrentProject.AllForms.Item(NomeObjecto).IsLoaded Then

Olá Alexandre, obrigado pelo ajuda!
Apliquei o modelo que você me passou mas não acontece nada... fiz vários testes em diferentes forms (com e sem o item BuscarProd), mas em nenhum caso acontece algo.

Fiz assim:
Private Sub Produto_DblClick(Cancel As Integer)
   If CurrentProject.AllForms.Item(BuscarProd).IsLoaded Then
       Forms!Main_Menu!SubFormAplicacao.Form!BuscarProd = Me.Produto
       Forms!Main_Menu!SubFormAplicacao.Form!OEM.Value = Null
       Forms!Main_Menu!SubFormAplicacao.Form!CR.Value = Null
   End If
End Sub

Boa tarde,
Tem de colocar o nome entre aspas
If CurrentProject.AllForms.Item("BuscarProd").IsLoaded Then

Alterei conforme o seu exemplo, mas não funcionou! Pois da erro e diz que objeto está fechado ou não existe!

Meu aplicativo provavelmente é diferente dos demais por trabalhar com um subform no form principal (main_menu) e qdo chama um form pelo menu abre dentro deste form... apenas alguns pop não abrem neste subform.
Anexei o Access com os forms envolvidos para que, se quiser dar uma olhada, talvez ajude...
Claro que pode entrar pressionando shift para poder ver o código sem travar, pois ao abrir normalmente esconde o Access...

login: teste
senha: 1234

Para chamar o form onde preciso colocar esta instrução é o cons_CR_Pop e chama ele pelo CTRL+2, aí já deixei o produto como valor padrão e basta dar dois cliques para rodar a instrução...

Bom dia,
Em formato não reconhecido. Coloque em 2003/2007

Valeu Avelino! Problema resolvido....
Valeu Alexandre pela ajuda... até tentei converter, mas dá uma mensagem que existem recursos que somente podem ser utilizados na versão atual e não deixa salvar no formato anterior...