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]Critério inserir dado em campo utilizando dados de outra tabela.

    Compartilhe

    renatojmaia
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 16/11/2012

    [Resolvido]Critério inserir dado em campo utilizando dados de outra tabela.

    Mensagem  renatojmaia em Qui 22 Maio 2014, 18:06

    No form de cadastro tem uma caixa de combinação que é critério para outro campo.

    Se utilizar uma instrução abaixo no evento ao alterar do campo. ficarei preso ao código no visual basic caso queira acrescentar mais cargo
    terei alterar também o código.

    ex.

    Código:
    If left(Me.CODIGOCARGO, 4) = "2681" Then
            Me.CARGO = "ARTIFICE DE MANUTENÇÃO"
    End If

    Tem outra forma de podermos pegar o dados da tabela para alimentar o campo sem que seja necessário alterar o código do campo?

    a Tabela Cargo tem o seguinte campos
    CODIGOCARGO
    CARGO
    SITCARGO
    NIVELESCOLARIDADE


    Está tabela serve de base para o campo CODIGOCARGO da tabela RelacaoGeral.

    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1119
    Registrado : 05/02/2010

    Critério inserir dado em campo utilizando dados de outra tabela

    Mensagem  good guy em Qui 22 Maio 2014, 18:16

    Olá Renato,

    Use a função DLookup.


    Dim nCod As Integer

    nCod = Forms!NomedoForm!Codigo 'Sendo que Codigo é uma caixa de texto não acoplada onde vc vai inserir códigos aleatórios de sua escolha
    SeuCampo = DLookup("Cargo", "SuaTabela","CodigoCargo = " & nCod)

    renatojmaia
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 16/11/2012

    Re: [Resolvido]Critério inserir dado em campo utilizando dados de outra tabela.

    Mensagem  renatojmaia em Qui 22 Maio 2014, 23:20

    Valeu! good guy

    Deu Certinho, quando eu coloco o código do cargo automaticamente aparece o nome do cargo, como eu estava precisando.

    Sem necessário alterar o código a cada novo cargo inserido na tabela cargos.
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1119
    Registrado : 05/02/2010

    Critério inserir dado em campo utilizando dados de outra tabela

    Mensagem  good guy em Sex 23 Maio 2014, 15:50

    Olá Renato,

    O fórum todo agradece,

    Se puder passa lá no Facebook e curta minha página para melhor divulgação e compartilhe entre seus amigos..

    [Você precisa estar registrado e conectado para ver este link.]

    Não deixe de visitar meu site:

    [Você precisa estar registrado e conectado para ver este link.]

    Baixe aplicativos gratuitos e como forma de contribuição apenas clique em meus anúncios.
    Baixe se desejar aplicativos comerciais, alguns são profissionalizantes.
    Baixe jogos de entretenimento educacional totalmente gratuitos.
    Baixe apostilas para estudo.
    Leia e copie dicas de Access VBA minhas e de outros colegas.

      Data/hora atual: Seg 23 Abr 2018, 03:00