MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    Atualização automática de campos em subformulário

    avatar
    angelomonteiro1981
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 16/04/2017

    Atualização automática de campos em subformulário Empty Atualização automática de campos em subformulário

    Mensagem  angelomonteiro1981 19/8/2017, 20:56

    Senhores, estou com uma dificuldade, a qual vou explicar abaixo. Estou enviando em anexo, parte do banco de dados, o qual por ser muito grande, para anexar, fiz várias exclusões para caber no anexo, portanto, já adianto que vão aparecer alguns erros ao acessar determinadas áreas, mas para o que preciso exemplificar, vai dar certo, ok.

    Então....

    Tenho um FORMULÁRIO principal (frmCadastro), e nele, dentre outros campos (os quais removi), tenho um SUBFORMULÁRIO (SubFrmCadEnvolvido).

    Neste SUBFORMULÁRIO tenho alguns campos; dentre eles o principal é NOME (txtNome) o qual consiste em uma COMBOX onde seleciono um nome qualquer e automáticamente os demais campos são preenchidos.

    Sempre que clico em um nome que já está na lista, automáticamente abre um FORMULÁRIO (FrmEnvolvidoAtualizar) no qual atualizo os campos PRESENÇA (txtPresenca), FOTO (txtFoco) e REINCIDENCIA (txtReincidencia).

    Gostaria que ao fechar o FORMULÁRIO (FrmEnvolvidoAtualizar) os campos do SUBFORMULÁRIO, ou seja,  PRESENÇA (txtPresenca), FOTO (txtFoco) e REINCIDENCIA (txtReincidencia) fossem atualizados automaticamente de acordo com as atualizações feitas no FORMULÁRIO (FrmEnvolvidoAtualizar).

    Só estou conseguindo esta atualização se clicar na COMBOX (Nome) e selecionar o nome correspondente novamente, só que daí, o FORMULÁRIO (FrmEnvolvidoAtualizar) também abre novamente.
    webruxim
    webruxim
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 08/12/2013

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  webruxim 20/8/2017, 03:22

    angelomonteiro1981, acredito que isso resolva no evendo ao sair do formulario, ou no evento click do botao sair.

    Código:


    Dim rst As DAO.Recordset
    Dim dbs As DAO.DataBase
    Dim strSql As String
        
    Set dbs = CurrentDb
    strSql = "SELECT * FROM NomedaSuaTabela"
    Set rst = dbs.OpenRecordset(strSql)
        
    If rst.RecordCount > 0 Then
       txtPresenca = rst("NomedoCamponaTabela")
       txt..... = rst("NomedoCamponaTabela")
       txtNomedoTextBox = rst("NomedoCamponaTabela")

    End If
    rst.Close
    Exit Sub


    avatar
    angelomonteiro1981
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 16/04/2017

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  angelomonteiro1981 20/8/2017, 04:06

    Obrigado pela ajuda, mas infelizmente não funcionou.
    webruxim
    webruxim
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 08/12/2013

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  webruxim 20/8/2017, 05:41

    baixei seu BD e no seu subformulario do formulario principal vc esta vinculando campos que nao existe, pra mim q sou limitado de conhecimentos fica dificil ajuda-lo.

    Fica no aguardo ae aos mestres se conseguem fazer alguma coisa por você.

    Mas pelo que entendi ali no seu BD é so dar uma atualizada no seu subformulario apos fechar o form (FrmEnvolvidoAtualizar).

    Tente no click do botao sair deste formulario adicionar este codigo, ou no evento do formulario (ao fechar)

    Forms!frmCadastro!subCadastroAutorCrimeFrm.Requery


    Última edição por webruxim em 20/8/2017, 05:46, editado 1 vez(es)
    avatar
    angelomonteiro1981
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 16/04/2017

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  angelomonteiro1981 20/8/2017, 05:43

    Como falei na primeira postagem... alguns erros estão sendo apresentados pois de fato há vinculações, neste caso não mais existentes, pois precisei diminuir o tamanho para anexar, e para isso exclui bastante coisa, porém, preservei o subformulário para que o problema relacionado a ele seja exemplificado.
    webruxim
    webruxim
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 08/12/2013

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  webruxim 20/8/2017, 05:49

    https://www.maximoaccess.com/t30881-botao-para-incluir-produto-da-venda

    Neste link consegui resolver um problema bem parecido com o seu, que era inculir informações em um sub. As vezes os codigos do exemplo pode te ajudar
    avatar
    angelomonteiro1981
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 16/04/2017

    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  angelomonteiro1981 20/8/2017, 22:21

    Tentei adaptar mas não está dando certo.

    Conteúdo patrocinado


    Atualização automática de campos em subformulário Empty Re: Atualização automática de campos em subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 15:52