botão no subformulário que coloque o mesmo não visível

Tenho um subformulário num formulário principal que após lançar dados quero que ele fique invisível no form principal.

Alguém pode me ajudar, não sei como fazer

INFORMAÇÃO:
o Formulário principal abre com o subformulário já visível, aí quero digitar um dado e acionar um botão para que ele o subformulário fique não mais visível.

Bom dia jmsousaPorto,

Adiciona um Botão no Form Principal e coloca o seguinte código:

Código:

With Me![Seu_Subform].Form
.Visible = False
End With

Boa sorte

Bom dia
Obrigado pela ajuda, mas não funcionou o sugerido

Private Sub Com_fechar_SForm_Click()
With Me![Frm_acesso2].Form.Visible = False
End With
End Sub

Grato pela tentativa.

Faça assim

Private Sub Com_fechar_SForm_Click()
Me.Frm_acesso2.Visible = False
End Sub

Private Sub Com_fechar_SForm_Click()
Me.Frm_acesso2.Visible = False
End Sub

==================================


Erro de compilação
Método ou membro de dados não encontrado



----------------

baixe o modelo e estude ele

Boa tarde jmsousaPorto,

Confirme se o nome do seu SubForm continua o mesmo de quando foi inserido no formulário principal.

E ainda, retire o foco do Subform antes de correr o código.

Boa sorte

Obg Alozs

Mas veja bem, o que necessito é criar um btn dentro do subform que o coloque invisível entende...

btn no form principal sem problema, agora quando dentro do subform...


Grato pela ajuda!

jmsousaPorto,

Estou aqui acompanhando o seu tópico, e me permita lhe perguntar: Por que o botão deve estar dentro do subformulário, se pelo o que entendi, você quer que o mesmo não fique visível, ao clicar no botão?

Boa tarde jmsousaPorto,

Você não conseguirá tornar o SubForm Invisível enquanto o mesmo estiver com o foco.

Pode dar um jeito, não fica muito perfeito.

Faça o teste:

Crie um botão no MainForm com o nome "cmdSubInvisible" e insira o código

Código:

Public Sub cmdSubInvisible_Click()
With Me.Seu_SubForm.Form

    .Visible = False

End With
End Sub

Repare que a Sub é pública.

No botão que quer executar a invisibilidade no SubForm coloque

Código:

Me.Parent.NomeDeUmCampoQualquer.SetFocus

Me.Parent.cmdSubInvisible_Click

Escolha um campo qualquer do seu MainForm para mudar o foco.

Resumindo, muda o foco para o MainForm, e de seguida chama o botão com o código.

Fiz o teste e funcionou.

Obrigado zcarloslopes

ótima solução, vou implementar.