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


    [Resolvido][Editado] Vincular valores em formulários/tabelas

    avatar
    Ccanastra
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 08/10/2022

    [Resolvido][Editado] Vincular valores em formulários/tabelas Empty [Resolvido][Editado] Vincular valores em formulários/tabelas

    Mensagem  Ccanastra 8/10/2022, 04:42

    Editado!

    Como faço para, no formulário, ao incluir a "COR", preencher, de forma automática, o campo "HEX", de acordo com a tabela?

    E pro caso de haver mais de um vínculo, como "COR"<--->"HEX"<--->"RGB", como fazer (caso seja necessário outra forma)?

    Segue o arquivo, com um exemplo do que eu não consigo fazer (no formulário "frm_produtos")!!

    Já procurei em vários lugares, mas não consegui solução!!

    Utilizo o Win_10, MSOffice 365.

    Desde já, grato!!!
    Anexos
    [Resolvido][Editado] Vincular valores em formulários/tabelas AttachmentEXEMPLO_Canastra.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (93 Kb) Baixado 4 vez(es)
    avatar
    Ccanastra
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 08/10/2022

    [Resolvido][Editado] Vincular valores em formulários/tabelas Empty Resolvi dessa forma

    Mensagem  Ccanastra 14/10/2022, 01:35

    Private Sub NOME_DA_COMBO_BOX_Click()
       
    With Me
    .NOME_DO_CAMPO_A_ACRESCENTAR.Value = NOME_DA_COMBO_BOX.Column(1) 'inserindo a 2ª coluna, considerando que a 1ª coluna
    'possui valor = 0, ou seja, a 2ª coluna possui valor = 1,
    'a 3ª coluna possui valor = 3, e sucessivamente dessa forma.

    .NOME_DO_CAMPO_A_ACRESCENTAR.Value = NOME_DA_COMBO_BOX.Column(2) 'inserindo a terceira coluna
    .NOME_DO_CAMPO_A_ACRESCENTAR.Value = NOME_DA_COMBO_BOX.Column(3) 'inserindo a quarta coluna
    .NOME_DO_CAMPO_A_ACRESCENTAR.Value = NOME_DA_COMBO_BOX.Column(4) 'inserindo a quinta coluna ...

    '...
       
    End With

    End Sub

      Data/hora atual: 28/4/2024, 21:19