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


4 participantes

    [Resolvido]Atualizar Combobox

    avatar
    valmeida
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 7
    Registrado : 14/04/2016

    [Resolvido]Atualizar Combobox Empty [Resolvido]Atualizar Combobox

    Mensagem  valmeida 19/3/2018, 14:41

    Bom dia.

    Já pesquisei em vários tópicos mas não consegui solucionar ainda.
    Tenho um formulário atendimento e outro clientes.
    No campo cliente há uma combobox com os clientes previamente cadastrados.
    Caso seja um novo cliente, que não consta na combobox, abre-se (como uma caixa de dialogo) o formulário cadastro de clientes para registrar o novo cliente.
    Após o cadastro, fecha-se a referida caixa de dialogo, porém a combobox não é atualizada com o novo cliente.
    Como proceder?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  Alexandre Neves 19/3/2018, 15:52

    Boa tarde,
    Ao retornar ao form, utilize o me.refresh


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    valmeida
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 7
    Registrado : 14/04/2016

    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  valmeida 19/3/2018, 16:37

    Obrigada mas não funcionou.
    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]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  Fernando Bueno 19/3/2018, 17:13

    Boa tarde, tente adaptar.

    Código:
    Me!cboCliente.Undo
        If MsgBox("O Cliente " & UCase(NewData) & " não está cadastrado. Cadastrar?", _
            vbQuestion + vbYesNo, "Não cadastrado...") = vbNo Then
            Me!nomeCliente.SetFocus ' Põe o foco no próprio campo
            Response = acDataErrContinue ' Aceita nova entrada
            Exit Sub
        End If
        DoCmd.OpenForm "frmCad_Cliente2", acNormal, , , acFormAdd, acDialog, _
            UCase(NewData) ' Abre form de cadastro de clientes
        Me!cboCliente.SetFocus ' Volta ao campo para confirmação
        Response = acDataErrAdded ' Atualiza a combo


    .................................................................................
    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]Atualizar Combobox 16rzeq
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3213
    Registrado : 13/12/2016

    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  Alexandre Fim 19/3/2018, 18:38

    Ola valmeida,

    Segue exemplo pra atender sua necessidade.
    []'s

    https://www.dropbox.com/s/cc7lvnrl9hpyl6a/Cliente.accdb?dl=0

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3213
    Registrado : 13/12/2016

    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  Alexandre Fim 21/3/2018, 01:39

    E ai valmeida?

    Os exemplos apresentados atenderam suas expectativas?
    Por gentileza, nos retorne para que o fórum saiba se foi resolvido ou não.

    Grato.

    []'s
    avatar
    valmeida
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 7
    Registrado : 14/04/2016

    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  valmeida 21/3/2018, 13:47

    Obrigada!!!
    Resolvido!!!

    Conteúdo patrocinado


    [Resolvido]Atualizar Combobox Empty Re: [Resolvido]Atualizar Combobox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 16:42