[Resolvido]Como executar botão de comando de um formulario dentro de um sub-formulario?

Olá amigos!

Vê se alguem pode me ajudar...
Tenho um banco de dados com varios formularios e no formulario principal eu coloquei outros usando sub-formularios. Nesses formularios que coloquei nos sub-formularios tem os botões de comando "Topo", "Anterior" e "Próximo". Todos os sub-formularios estão ocultos (não visiveis) e são visualizados quando eu clico em determinados botões, sendo assim, eu preciso de um codigo que me permita, ao clicar no botão "Topo",somente ocultar o sub-formulario atual. Ao clicar no botão "Anterior", ocultar o sub-formulario atual e visualizar um sub-formulario correspondente e a mesma coisa para o botão "Próximo". Caso alguem tenha entendido e puder me ajudar ficarei muito grato.

Abraço a todos!

Vamos ver se entendi

Você pode nos botões colocar algo assim,. conforme a necessidade

por exemplo

Botão topo click()

Me.Nome do subformulário.Visible=False

Para mostrar de novo

Me.Nome do subformulário.Visible=True

Olá amigo Vieirasof!

Primeiramente obrigado pela atenção.

Não funcionou. Acredito que nao ficou muito facil de entender a minha explicação, mas vou insistir:
Esse botao "Topo" esta dentro do sub-formulario e o que eu preciso ao clicar nele é oculta-lo, isso me permitiria visualizar o texto da apresentação, pois trata-se de um arquivo "Ajuda" que to desenvolvendo para o meu programa.

Abraço!

Certo, não tinha entendido mesmo. Você não pode ocultar um objecto em si mesmo. Pode oculta-lo a partir de um terceiro elemento, ou seja, pode ocultar pre definindo nas propriedades do objecto, através de um procedimento em VBA ou Macro. Ora se o botão está dentro do próprio sub formulário, logo não pode ocultar o sub form através de este botão, pois também não pode ocultar este botão com um o facto de clicar nele.

Entendi...
...mas eu posso pelo menos visualizar outro sub-formulario sem ocultar o atual clicando no botao "Próximo"?

Pode. No botão chamado próximo coloque:

Forms!NomeDoFormulario!NomeDoSeuOutroSubFormulario.Visible = True

Ops!Não o abandonei não, amigo, apenas fui jantar (rsrsrs), mas o Dilson já lhe transmitiu a forma certa de fazer isso. Bom trabalho.

Sabe Vieira e lupe, uma idéia, não testei.

Poderia ao apertar esse botão levar o foco para um outro controle e esse controle que receber o foco fazer ocultar o subformulario, mais ou menos assim:

Um Formulário
Dois SubFormulario (A e B) campo codigo nos dois.

No botão próximo do SubForm A a seguinte linha de código no evento Click:

Forms ! NomeDoFormulario ! NomeDoSeuOutroSubFormularioB . Visible = True
Forms ! NomeDoFormulario ! NomeDoSeuOutroSubFormularioB ! codigo . SetFocus

No evento ao receber foco do campo codigo do SubForm B o seguinte:
Forms ! NomeDoFormulario ! NomeDoSeuOutroSubFormularioA . Visible = False

pode dá certo sincronizar assim.

Penso que pode dar sim amigão. Vou experimentar aqui numa ap qualquer e retorno.

Grande Dilson!

Realmente é isso ai...

Valeu amigo!

O foco não passa Dilson, o resto funciona.

Que é isso amigo vieira, pelo que ja vi aqui no forum voce nunca abandonou ninguem
e nao seria eu o primeiro...abraço!

Ótimo que deu certo.

O fórum fica alegre com o sucesso!

Abraço para si também e bom trabalho.

Dilson, verifica se o focus funciona. O resto funciona tudo como digistas-te acima. Também não dá erro, mas não passa o foco. Experimentei a partir de un sub form para outro

Vieira, quando voce diz que o resto funciona, voce esta afirmando que o subformularioA fica oculto?!

Sim, mas isso era óbvio que o código que o Dilson postou iria funcionar. Agora só o campo para o qual dirijo o foco não fica com ele

Não tenho como testar agora. Estaria o formulario chamando esse foco, não?

Realmente amigo Vieira...
voces são muito bons no mundo access...parabens!!!

Amanha eu incomodo voces um pouco mais com a minha leiguisse...rsrs

Pois, eu estava passando o foco do formulário A para um campo no B, tornando-o visível e isso não está a dar. No exemplo que colocas-te acima o foco está no primeiro sub form. No meu caso, no segundo. Não pintou.

Vieira e lupe, realmente funcionava, mas, o foco não ia.

agora vai, teste para ver:

No evento Click do botão próximo coloque assim:

Private Sub Proximo_Click()
Forms!NomeDoFormulario!NomeDoSeuOutroSubformularioB.Visible = True
DoCmd.GoToControl "NomeDoSeuOutroSubformularioB"
DoCmd.GoToControl "codigo"
End Sub

Abaixo o pequeno exemplo:

Funciona tudo OK, Dilson. Abração.

Valeu brother!

Olá Dilson e Vieira!

Baixei o exemplo que voce postou mas ontem mesmo eu segui o caminho que voce mostrou e cheguei ao resultado que eu queria para os 3 botoes: Topo, Anterior e Próximo.

Fiz o seguinte:

No formulario principal(FAjuda) tem os sub-formularios A(FMarcaO), B(FAplicOleo) e C(FFunçoes).

No sub-formB para o botao "Anterior" fiz o seguinte:
Private Sub cmdOption03_Click()
Forms!FAjuda!FMarcaO.Visible = True
Forms!FAjuda!FMarcaO.SetFocus
End Sub

Então, no sub-formA coloquei no evento Ao Entrar:
Private Sub FMarcaO_Enter()
Forms!FAjuda!FAplicOleo.Visible = False
End Sub

No sub-formB para o botao "Próximo" fiz o seguinte:
Private Sub cmdOption01_Click()
Forms!FAjuda!FFunçoes.Visible = True
Forms!FAjuda!FFunçoes.SetFocus
End Sub
Nesse caso, se os sub-form foram criados na ordem das letras, entao nao sera necessario usar o evento Ao Entrar no sub-formC.

E para todos os sub-form usei o mesmo codigo no botao "Topo":
Private Sub cmdOption02_Click()
Forms!FAjuda!FApres.Visible = True
Forms!FAjuda!FApres.SetFocus
End Sub

No formulario principal eu fiz a apresentaçao do programa, que fica oculto quando visualizo um sub-form. Sendo assim, para ocultar um sub-form visualizado ao clicar no botao "Topo" eu criei o sub-form "FApres" somente para receber o foco e ocultar o
sub-form onde esta o botao "Topo".

Espero que eu tenha conseguido colocar o que eu fiz. Ficou otimo, exatamente como eu queria.

Abraço a todos!

E muito obrigado aos amigos Vieira e Dilson.

Valeu brother,

Fico contente pela sua desenvoltura e vontade de retribuir aqui demonstrada.

O Fórum agradece!

Dilson,
Boa noite!

Eu gostaria muito de deixar aqui, para quem possa interessar, um exemplo do arquivo
Ajuda que descutimos sobre os botões "Topo", "Anterior" e "Próximo", pois assim acho
que ficara melhor entendido. Não sei se ja existe no forum um exemplo parecido, pois procurei e não encontrei.
Enfim, voce pode me dizer se posso e como faço isso?

Abraço!

Amigo, se refere aquele menu de controle daquela aplicação e que deduzo que o a implementações topo anterior e próximo foi feito nele. é ele?

Não meu amigo, se voce quer saber se estou falando do exemplo que voce deixou no forum ontem, não é ele não. É o arquivo que eu estou desenvolvendo ha alguns dias. Ainda não terminei mas acho que ja da pra deixar como exemplo, mesmo porque nao vai mudar muito alem de como esta hoje.

Ok entendido,

O fórum tem a sala Repositório de exemplos MS Access.

Você precisará zipar seu exemplo. Daí você abre um tópico na sala acima citada coloca o o nome como título e anexa o exemplo com as ferramentas de anexo do fórum ou hospedado em algum servidor público (sites como o dropbox, esnips 4shared).

Contribuições em formas de exemplo são de grande valia ao grupo.

Qualquer dificuldade para fazer isso, diga que ajudo.

Amigo, não to conseguindo...
Sera que eu posso enviar o exemplo no seu email pra voce colocar no forum?

Sim, eu hospedo o exemplo colocarei o link no tópico que você abriu na sala de exemplos.

Obrigado Dilson!

Mas tentei novamente e acho que consegui.

O titulo é o seguinte:

Arquivo Ajuda Desenvolvido em Access

Voce pode confirmar se eu realmente consegui?!

Colocou no sítio certo, amigo. Está tudo OK.

Valeu amigo!

Fui la dar uma conferida. Fico feliz de ter contribuido com o fórum.
Espero logo ter outro exemplo para compartilhar aqui.