MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Botão para chamar subformulário em formulário principal

    Compartilhe

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 43
    Registrado : 20/04/2017

    [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  daygdson em 12/6/2017, 11:12

    Olá Prezados usuários do fórum, sou novo aqui e esta é minha primeira postagem, caso esteja fazendo pergunta no campo errado por favor moderadores me corrijam!

    Seguinte, estou com uma dúvida que está me matando e gostaria da ajuda de vocês, verifiquei no fórum e não achei o que estou procurando em relação ao meu problema.

    Tenho um formulário de cadastro de clientes que este contém um subformulário para gerar um histórico de ações de contato com o cliente, o problema é que gostaria de em vez de vincular o botão para chamar o subformulário e quando ele abre eu tenho que novamente selecionar o "Cliente" para que possa ser gerado o vínculo de tabelas eu gostaria de chamar este subformulário através de um botão de ação e este vínculo fosse automático.

    Só pra registrar a relação entre tabelas está ok, funciona perfeito conforme citado acima no botão de vínculo do formulário Clientes, mas gostaria de colocar isto no automático com vínculo de campos mestres e filho das tabelas, para que quando eu clicar no botão do formulário clientes, este chame o subformulário e automaticamente grave a chave primaria do cliente à campo códcliente na tabela histórico para que se faça a relação que preciso.

    Outra coisa, para melhor esclarecer, quando crio o subformulário arrastando pra dentro do formulário principal faz exatamente o que quero, porém na minha tela de formulário principal existe vários dados necessários e ocupa muito do layout da tela e por isso quero chamar através do botão

    Segue o código de vínculo de botão que utilizo atualmente



    Privat Sub btnHistorico_Click()
    On Error GoTo btnHistorico_Click_Err

       If ChildFormIsOpen() Then
           CloseChildForm
       Else
           OpenChildForm
           FilterChildForm
       End If

    btnHistorico_Click_Exit:
       Exit Sub

    btnHistorico_Click_Err:
       MsgBox Error$
       Resume btnHistorico_Click_Exit

    End Sub
    Private Sub FilterChildForm()

       If Me.NewRecord Then
           Forms![SUBFORM_HISTORICO].DataEntry = True
       Else
           Forms![SUBFORM_HISTORICO].Filter = "[IDCLIENTE] = " & Me.[IDCLIENTE]
           Forms![SUBFORM_HISTORICO].FilterOn = True
       End If

    End Sub
    Private Sub OpenChildForm()

       DoCmd.OpenForm "SUBFORM_HISTORICO"
       If Not Me.[btnHistorico] Then Me![btnHistorico] = True

    End Sub
    Private Sub CloseChildForm()

       DoCmd.Close acForm, "SUBFORM_HISTORICO"
       If Me![btnHistorico] Then Me![btnHistorico] = False

    End Sub
    Private Function ChildFormIsOpen()

       ChildFormIsOpen = (SysCmd(acSysCmdGetObjectState, acForm, "SUBFORM_HISTORICO") And acObjStateOpen) <> False

       
    End Function


    Se puderem me ajudar agradeço a todos.
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3672
    Registrado : 20/04/2011

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  Silvio em 13/6/2017, 14:43

    Boa tarde...

    Será mais simples postar o sistema apenas com as tabelas e formulários envolvidos para lhe ajudarmos.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 43
    Registrado : 20/04/2017

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  daygdson em 14/6/2017, 08:49

    Bom dia Silvio, obrigado pelo interesse, segue tabelas e formulários que vc pediu referente ao meu problema
    Se vc observar, consigo cadastrar normalmente, quando abro o Form_Clientes, eu clico no botão abre o form_histórico só que preciso que este esteja vinculado automaticamente ao formulário "Clientes" e atualmente tenho que selecionar o código do cliente no subformulário Histórico para vincular, após vínculo quando faço consultas de clientes busca corretamente o histórico referenciado mas gostaria que fosse automático.

    Fico no aguardo,
    Anexos
    ClientesExemplo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (2.2 Mb) Baixado 9 vez(es)
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3672
    Registrado : 20/04/2011

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  Silvio em 14/6/2017, 09:51

    Bom dia...

    Fiz algumas mudanças no relacionamento entre as tabelas.

    Veja os códigos que eu coloquei:
    no botão Histórico do Form_cliente
    nos eventos que estão no Form_historico e no botão adicionar.

    Bons estudos !
    Anexos
    ClientesExemplo_new.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (794 Kb) Baixado 12 vez(es)


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 43
    Registrado : 20/04/2017

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  daygdson em 14/6/2017, 09:54

    Ok, obrigado pelo seu apoio, vou aplicar suas sugestões e posto o resultado logo mais.

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 43
    Registrado : 20/04/2017

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  daygdson em 14/6/2017, 11:17

    Caro Silvio, Perfeita sua solução, não conseguiria fazer melhor.

    Obrigado pela ajuda.

    Caso Resolvido !

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 43
    Registrado : 20/04/2017

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  daygdson em 14/6/2017, 11:24

    Agradecendo mais uma vez o colega Silvio pela sua atenção em me ajudar a solucionar meu problema, apliquei conforme exemplo e funcionou perfeitamente. Caso Resolvido !
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3672
    Registrado : 20/04/2011

    Re: [Resolvido]Botão para chamar subformulário em formulário principal

    Mensagem  Silvio em 14/6/2017, 12:42

    Valeu, o fórum agradece o retorno !


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: 22/11/2017, 05:50