[Resolvido]Capturar nome do formulario em uma String quando ele estiver visivel

Bom dia amigos... tenho varios formularios iguais mas com nomes diferentes que usarao o mesmo relatorio.
Ocorre que ao abrir o relatorio há instrucao para oculta-lo... Para evitar criar relatorios para cada formulario, pretendo capturar o nome do formulario que esta visivel para que ao abrir o relatorio ele possa ser ocultado

Como capturar o nome do formulario visivel?
'Oculto o primeiro Formulario
Forms!frmRelatoriosCaixa.Visible = False
'Ficara visivel o formulario que pretendo ocultar, no caso o frmMovimentoCaixa
'Esta instruçao esta ao abrir relatorio... so que o formulario pode ser o frmMovimentoCaixa ou frmMovimentoCaixa_1 etc..
'entao quero capturar o nome do que esta visivel para colocar ai na instrucao que o oculta
Forms!frmMovimentoCaixa.Visible = False

Obrigado pela Ajuda.

Haryohn

Olá...

Tenho um caso parecido em que gero um mesmo relatório através de vários formulários.

Tenho este código ao carregar o relatório, assim ele verifica qual form esta aberto e executa.

pode ser que te ajude.

Código:

Private Sub Report_Load()
If CurrentProject.AllForms("frmReceitasDespesas").IsLoaded = True Then
    Faça algo

ElseIf CurrentProject.AllForms("frmReceitasDespesasMultiplos").IsLoaded = True Then
   Faça algo mais isto
    
ElseIf CurrentProject.AllForms("frmPedidosVendasBaixas").IsLoaded = True Then
    faça isto mais qualquer coisa
End If
End Sub

 

Abraços

Boa noite Celso... Obrigado pela Ajuda. Funcionou perfeitamente.


Sucesso!

Olá HARYSOHN

Obrigado pelo retorno.

Fiquei feliz por ter ajudado

PS: Alterei o código acima para Private Sub Report_Load(), tinha digitado Form

Abraços