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


3 participantes

    [Resolvido]Inserir automaticamente uma informação

    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Inserir automaticamente uma informação

    Mensagem  viniciusgnr 24/5/2012, 18:10

    Olá a todos. Sou novo no fórum e estou procurando aprender mais sobre o Access.

    Tenho uma dúvida. Como programar para que determinado campo do formulário seja automaticamente preenchido conforme a informação de outro campo?

    Por exemplo, tenho duas tabelas:

    Tabela A
    Grupo...........Responsáveis
    Grupo 1.........João / Maria / José
    Grupo 2.........Aldo / Bela / João
    Grupo 3.........Aldo / Bela / Maria
    Grupo 4.........Bela / José / Maria


    Tabela B
    Compra
    Grupo
    Responsáveis

    Eu queria fazer com que, ao preencher o campo "Grupo" do formulário baseado na Tabela B, o campo "Responsáveis" fosse preenchido automaticamente conforme os responsáveis definidos na Tabela A. Por exemplo:

    Compra: Martelo
    Grupo: Grupo 1
    Responsáveis: João / Maria / José (preenchidos automaticamente)

    Como fazer? Coloco uma função na origem da linha do campo?


    Desde já obrigado,
    Vinícius
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  RneoX 24/5/2012, 18:28

    usando uma combobox acoplado, exemplo:

    Tabela A
    Grupo(1)...........Responsáveis(2)
    Grupo 1.........João / Maria / José
    Grupo 2.........Aldo / Bela / João
    Grupo 3.........Aldo / Bela / Maria
    Grupo 4.........Bela / José / Maria

    Tabela B
    Compra <- Textbox
    Grupo <-- Textbox
    ResponsáveisGrupo <-- Combo box *(mas a fonte de dados tem que ser igual ao grupo, os 2 tem que ser o mesmo e então vá até a origem da linha entra com a "tabela A" e então selecione coluna acoplada "1", agora coloque em número de colunas "2" e largura de colunas "0;10"

    Lembrando tirar as Aspas " " de cada numero citado a cima...

    boa sorte e abraços...


    parece que ficou um pouco confuso a explicação:
    na tabela B não precisa ter Responsáveis, Basta ter 2 campos Grupo, com Fonte iguais, mas um sendo Textbox e outro Combobox


    Última edição por dhtm15 em 24/5/2012, 18:43, editado 1 vez(es) (Motivo da edição : explicação 2)


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  viniciusgnr 24/5/2012, 18:48

    Obrigado pelo retorno, amigo. Mas ainda me sobraram dúvidas.

    Combo box seria a caixa de combinação (uso Office 2007)?

    Se eu alterar a fonte do controle no formulário, ele não passa a parar de alimentar a tabela no campo correto?

    Não entendi quando vc disse "e então selecione coluna acoplada "1", agora coloque em número de colunas "2" e largura de colunas "0;10"

    Os campos que busquei foram esses que coloquei no anexo e não os encontrei. Tá correto?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  Alexandre Neves 24/5/2012, 20:01

    Boa tarde, vinicius, e bem-vindo ao fórum

    Pode-se-fazer o que pretende mas, respeitando o princípio duma base de dados relacional, o campo responsáveis ficará duplicado desnecessariamente e, por isso, não deve existir na segunda tabela.
    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  viniciusgnr 24/5/2012, 20:07

    Ok, obrigado pelo retorno.

    Fazendo da forma como foi indicada, conseguiria emitir um relatório contendo os dados da compra, grupo e responsáveis?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  Alexandre Neves 24/5/2012, 20:19

    Olá, vinicius

    Consegue. É essa a vantagem da bd "relacional", ela relaciona as duas tabelas por um campo comum (mas pode ser por mais campos comuns)
    Exponho um exemplo saído na unha:

    Viaturas
    NrViatura Marca Matricula
    1 Opel 85-00-PA
    2 Mercedes 12-99-MN

    Funcionarios
    NrFunc NomeFunc Viatura
    1 José 2
    2 Manuel 1

    Despesas
    DataDesp NrViatura Documento Val
    01-01-2012 2 Fact 10
    01-01-2012 1 VD

    Daqui consegue listar a viatura, o nome do funcionário a quem a viatura está atribuída, as despesas efectuadas, etc.
    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  viniciusgnr 24/5/2012, 20:32

    Ok, muito obrigado a todos pelas respostas.

    Se eu tiver alguma dificuldade na hora de montar o relatório, volto a perguntar aqui. Cool
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  RneoX 24/5/2012, 22:09

    [[[[Obrigado pelo retorno, amigo. Mas ainda me sobraram dúvidas.

    Combo box seria a caixa de combinação (uso Office 2007)?

    Se eu alterar a fonte do controle no formulário, ele não passa a parar de alimentar a tabela no campo correto?

    Não entendi quando vc disse "e então selecione coluna acoplada "1", agora coloque em número de colunas "2" e largura de colunas "0;10"

    Os campos que busquei foram esses que coloquei no anexo e não os encontrei. Tá correto?]]]]

    sim é exatamente esta tela em que você está, desculpe é que respondi nas pressas pois ja estava de saída, então vamos explicar direitinho:

    A combobox seria a caixa de combinação,

    :Tabela A
    Grupo(1)...........Responsáveis(2)
    Grupo 1.........João / Maria / José
    Grupo 2.........Aldo / Bela / João
    Grupo 3.........Aldo / Bela / Maria
    Grupo 4.........Bela / José / Maria

    Tabela B
    Compra <- Textbox
    Grupo <-- Textbox
    ResponsáveisGrupo <-- Combo box *(mas a fonte de dados tem que ser igual ao grupo, os 2 tem que ser o mesmo e então vá até a origem da linha entra com a "tabela A" e então selecione coluna acoplada "1", agora coloque em número de colunas "2" e largura de colunas "0;10"

    Lembrando tirar as Aspas " " de cada numero citado a cima...

    então digamos, você tem na tabela B o campo Compra Grupo e Responsáveis, mas na verdade você não precisa dos responsáveis quando se quer amarrar 2 campos...

    Então o que deve ser feito é um campo clonado do que vai puxar a outra informação, e a que for combobox *caixa de combinação* será a que vai trazer a tona a informação que deseja...

    vamos para um exemplo aqui no anexo:

    Anexos
    [Resolvido]Inserir automaticamente uma informação AttachmentRelação.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (23 Kb) Baixado 30 vez(es)


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  viniciusgnr 25/5/2012, 18:04

    Ok amigos, já entendi como fazer. Agora tô com problema quando envolve mais de uma coluna, por exemplo:

    Fornecedor......|.CNPJ...................|.CPF...........
    Ababababa.......|.01.234.567/0001-99.....|...............
    Ebebebebe.......|.98.765.432/0001-00.....|...............
    Ibibibibi.......|........................|.123.456.789-01
    Obobobobo.......|.11.222.333/0001-44.....|...............
    Ububububu.......|........................|.999.999.999-88


    Na minha tabela de compra, tenho então os 3 campos: Fornecedor, CNPJ e CPF. Como fazer então para, ao preencher o campo Fornecedor, preencher os outros campos de forma automática? No caso, se tiver CNPJ, preenche com o CNPJ; se for CPF, preenche o CPF.

    Obrigado,
    Vinícius
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  RneoX 25/5/2012, 18:09

    simples, pega o campo em que você vai amarrar + 2 campos (**Sempre copia a fonte da ligação do campo de combinação**) e então na repetindo o processo, em vez de você usar 2 colunas e largura de coluna 0;10 então você usa assim:

    Coluna Acoplada: 1
    Quantidade de colunas: 3 (Lembrando que isto está se referindo a tabela, então você vai mostrar as 3 primeiras colunas da tabela na caixa de combinação)
    Largura de Coluna: 0;0;10 (Aqui você vai ocultar as 2 primeiras colunas, pois não lhe interessa, ja que estamos falando de uma terceira opção)

    se quiser fazer 4 então faça o mesmo processo, só que com 4 e 0;0;0;10



    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    avatar
    viniciusgnr
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 24/05/2012

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  viniciusgnr 25/5/2012, 18:24

    Mas que ótimo! Finalmente consegui entender a lógica do funcionamento.

    Obrigado mesmo!
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  RneoX 25/5/2012, 22:55

    Se está solucionado, por favor altere o titulo do tópico com [Resolvido]

    e seja sempre bem vindo, todos que compartilham o conhecimento são herdeiros de um bom mestre...


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  Alexandre Neves 4/8/2012, 19:11

    O assunto passa a Resolvido.

    Conteúdo patrocinado


    [Resolvido]Inserir automaticamente uma informação Empty Re: [Resolvido]Inserir automaticamente uma informação

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 21:43