[Resolvido]Ocultar subformulario

Boa noite

Formulario "Encomenda" com subformuário "Pes"

Os dois tem o campo "Cliente", quando o nome do cliente é igual nos dois formulário

Onde estou a errar

Após atualizar o campo "Cliente"

If Me!Cliente = Forms!Encomenda.PES.Form!cliente Then

Forms!Encomenda!PES.Form.Visible = True

Else

Forms!Encomenda!PES.Form.Visible = False

End If

Obrigado

Código:

Forms!Encomenda!PES.Visible = Me!Cliente = Forms!Encomenda.PES.Form!cliente

Código:

With CodeContextObject
       
        If Me.Texto0 = 1 Then
        DoCmd.SetProperty "Texto1", acPropertyVisible, "0"
       
       
   
     
        Else
            DoCmd.SetProperty "Texto1", acPropertyVisible, "-1"
       
        End If
        End With

Bom dia Ivan

a sua dica não funcionou, nem chega a abrir o subformulário quando deve.

O subformulário PES é um formulário continuo com cabeçalho.

O melhor que consigo é com o código abaixo, mas mesmo assim quando não deve ser visível o subformulário PES, mostra o cabeçalho.  

Mas se não usar o "On Error Rsume Next", dá erro.
___________________________________________________________________
On Error Resume Next

If Me!Cliente = Forms!Encomenda!PES.Form!Cliente Then
  Forms!Encomenda!PES.Form.Visible = True
End If
_________________________________________________________________________

Não devia mostrar


Correto



Obrigado

Maicon

Não percebi o seu código
Obrigado

Veja e adapte ao seu cenário.

Se não der certo, anexe seu projeto com as partes envolvidas.

Obrigado Ivan

Bom domingo .

O fórum agradece o retorno. Sucesso.