MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Sobre Caixa de Combinação

    avatar
    Anslu
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 82
    Registrado : 10/01/2018

    [Resolvido]Sobre Caixa de Combinação Empty [Resolvido]Sobre Caixa de Combinação

    Mensagem  Anslu em Qui Out 24, 2019 1:40 pm

    Boa Tarde, Estou tentando fazer com que a caixa de combinação receba o valor do usuário  logado.
    Não tenho exito. isso é possível?


    Caixa de Texto
    Me.txt_Logado = DLookup("UsuarioLogado", "tbl_UsuarioLogado")

    Gostaria que a caixa de combinação recebece
    me.CboCaixa = DLookup("UsuarioLogado", "tbl_UsuarioLogado") Não funciona


    Obs.: a Caixa de combinação tem os mesmos nomes dos usuário.


    Sò que uma explicação acerca da minha dúvida!

    Obrigado!


    Última edição por Anslu em Qui Out 24, 2019 1:49 pm, editado 2 vez(es)
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    [Resolvido]Sobre Caixa de Combinação Empty Re: [Resolvido]Sobre Caixa de Combinação

    Mensagem  renpv em Qui Out 24, 2019 1:44 pm

    É possível com VBA. Mas não vejo uma necessidade prática pra isso.
    avatar
    Anslu
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 82
    Registrado : 10/01/2018

    [Resolvido]Sobre Caixa de Combinação Empty Re: [Resolvido]Sobre Caixa de Combinação

    Mensagem  Anslu em Qui Out 24, 2019 1:49 pm

    Gostaria que a caixa de combinação recebece
    me.CboCaixa = DLookup("UsuarioLogado", "tbl_UsuarioLogado") Não funciona
    Maicon
    Maicon
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 234
    Registrado : 07/09/2012

    [Resolvido]Sobre Caixa de Combinação Empty Re: [Resolvido]Sobre Caixa de Combinação

    Mensagem  Maicon em Qui Out 24, 2019 2:48 pm

    Tente fazer referência a coluna da combo


    Me.CboCaixa.Column(1) = DLookup("UsuarioLogado", "tbl_UsuarioLogado")

    Provavelmente sua combo faz referências a colunas, lembre-se que normalmente começa com Column(0).


    [Resolvido]Sobre Caixa de Combinação Exempl10


    Última edição por Maicon em Qui Out 24, 2019 4:05 pm, editado 1 vez(es) (Razão : Inserir imagem exemplo.)


    .................................................................................
    "O talento vence jogos, mas só o trabalho em equipe ganha campeonatos."
    Michael Jordan

    Bons Estudos.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Sobre Caixa de Combinação Empty Re: [Resolvido]Sobre Caixa de Combinação

    Mensagem  Alexandre Fim em Qui Out 24, 2019 3:00 pm

    Olá,

    Sim. É possivel carregar o combobox via VBA.
    Segue pequeno exemplo.

    Espero ter ajudado

    Boa sorte

    Att,
    Anexos
    [Resolvido]Sobre Caixa de Combinação AttachmentUsuarioLogado.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (25 Kb) Baixado 13 vez(es)


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    avatar
    Anslu
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 82
    Registrado : 10/01/2018

    [Resolvido]Sobre Caixa de Combinação Empty Re: [Resolvido]Sobre Caixa de Combinação

    Mensagem  Anslu em Qui Out 24, 2019 5:51 pm

    Muito Obrigado pela ajuda!

      Data/hora atual: Qua Set 23, 2020 9:49 am