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]Sobre Caixa de Combinação

    avatar
    Anslu
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 11/01/2018

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

    Mensagem  Anslu em Qui 24 Out 2019, 19:40

    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 24 Out 2019, 19:49, editado 2 vez(es)
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  renpv em Qui 24 Out 2019, 19:44

    É 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 : 63
    Registrado : 11/01/2018

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

    Mensagem  Anslu em Qui 24 Out 2019, 19:49

    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 : 229
    Registrado : 07/09/2012

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

    Mensagem  Maicon em Qui 24 Out 2019, 20:48

    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 24 Out 2019, 22:05, 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 : 940
    Registrado : 13/12/2016

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

    Mensagem  Alexandre Fim em Qui 24 Out 2019, 21:00

    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 8 vez(es)


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    avatar
    Anslu
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 11/01/2018

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

    Mensagem  Anslu em Qui 24 Out 2019, 23:51

    Muito Obrigado pela ajuda!

      Data/hora atual: Seg 25 Maio 2020, 04:52