ae galera to tentando colocar este codigo no form unload de uma tela o conteúdo do campo txtquemchamou.caption é o nome do form anterior exemplo, "frmEmpresas"

mas ano sei oq esta errado mas nao esta dando certo.

 

 

    If txtQuemChamou.Caption <> "" Then
        Dim Formulario As Form
        Set Formulario = Forms(txtQuemChamou.Caption)
        Formulario.Visible = True
    End If

Já tentou?

 

If txtQuemChamou.Caption <> "" Then
        Dim Formulario As Form
        Set Formulario = Forms.Name(txtQuemChamou.Caption)
        Formulario.Visible = True
    End If

ou

 

If txtQuemChamou.Caption <> "" Then
        Dim Formulario As Form

        Formulario.Name = txtQuemChamou.Caption
        Set Formulario = Forms

        Formulario.Visible = True
    End If

 

vlu//

 

 

ou