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

    [Resolvido]Trazer cadastro para o formulário pai

    avatar
    francisconpinheiro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 28/02/2014

    [Resolvido]Trazer cadastro para o formulário pai Empty [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  francisconpinheiro 23/4/2014, 18:23

    Boa tarde,

    Gostaria de saber se tem como o Access puxar uma informação que eu acabei de cadastrar em um formulário filho para o campo dele no formulário pai.

    Ex. Tenho um formulário que tem todas as informações de um pedido. Estava inserindo as informações quando descobri que o cliente não está cadastrado, abri o formulário de cadastro de clientes e inseri as informações do cliente. Quando eu fecho o formulário filho (Clientes) eu quero que o cliente seja selecionado automaticamente no formulário pai.

    Agradeço desde já.
    Atenciosamente,
    Francisco Pinheiro
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  Fernando Bueno 23/4/2014, 22:26

    Boa noite amigo, como você seleciona o cliente?

    Se for por uma combo pode inserir um comando se não estiver na lista, abrindo o cadastro e depois

    retornando ja com o mesmo cadastrado.


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Trazer cadastro para o formulário pai 16rzeq
    avatar
    francisconpinheiro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 28/02/2014

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  francisconpinheiro 24/4/2014, 19:18

    Boa tarde amigo,

    Eu seleciono o cliente por uma combo, mas não entendi como fazer o comando.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  Fernando Bueno 24/4/2014, 20:27

    Boa tarde Francisco, coloque o seguinte codigo no evento Se não estiver na lista

    da sua combo, renomeie os nomes de formularios...

    Private Sub SuaCombo_NotInList(NewData As String, Response As Integer)
    ' ativa o tratamento de erros
    On Error Resume Next
    ' emite mensagem para o usuario alertando item fora da lista
    Response = MsgBox("Deseja cadastrar o cliente " & NewData, vbYesNo, "Cliente não cadastrado")
    ' se a reposta foi sim
    If Response = vbYes Then
      ' abre o formulario para cadastrar
    DoCmd.OpenForm "SeuFormularioCadastroDeClientes", , , , acFormAdd, acDialog, NewData
      'depois que o formulario clientes é fechado o codigo continua
       ' e repete a consulta na lista de clientes

       Me.SuaCombo.Requery
    Else
      ' não emite mensagem de erro
       Response = acDataErrContinue
       'limpa o valor digitado e aguarda
       SendKeys "{ESC}"
    End If
    End Sub


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Trazer cadastro para o formulário pai 16rzeq
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  Fernando Bueno 1/5/2014, 11:49

    Bom dia amigo, resolveu a duvida?

    Se sim peço que clique no Resolvido para fecharmos o topico..


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Trazer cadastro para o formulário pai 16rzeq
    avatar
    francisconpinheiro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 28/02/2014

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  francisconpinheiro 3/6/2014, 21:58

    Obrigado pela ajuda.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  Fernando Bueno 4/6/2014, 03:37

    Por nada, agradeço o retorno em nome do forum!


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Trazer cadastro para o formulário pai 16rzeq

    Conteúdo patrocinado


    [Resolvido]Trazer cadastro para o formulário pai Empty Re: [Resolvido]Trazer cadastro para o formulário pai

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 13:12