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

2 participantes

    Codigo VBA para procurar registo

    avatar
    Lih
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 36
    Registrado : 29/08/2014

    Codigo VBA para procurar registo Empty Codigo VBA para procurar registo

    Mensagem  Lih 14/10/2014, 11:57

    Olá a todos, preciso de ajuda por favor.

    Tenho um formulário (formulário_oftaData) com um subformulário, no formulário_oftaData tenho os campos Subject_ID e Subject_Name, no subformulário correspondente insiro um tipo de informação sobre este sujeito.

    1º - Num formulário_geral, quero procurar um sujeito da tabela dados do sujeito.

    2º - No formulário_oftaData quero que o Sujeito para introduzir dados seja o que se procurou no formulário_geral.

    eu utilizei o seguinte:

    Forms!formulário_oftaData!Subject_ID=Forms!formulário_geral!Subject_ID.

    Só que aparece o seguinte erro: «'As alterações pedidas para a tabela não foram bem sucedidas, pois iriam criar valores duplicados no indice, chave primária ou relação'.

    O que concluo é que está tentar inserir os dados na tabela e não procurar o registo :\


    Nunca programei em VBA não consigo resolver.

    Muito Obrigado! Smile

    Cumprimentos,

    Lilia Jorge

    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4145
    Registrado : 29/06/2012

    Codigo VBA para procurar registo Empty Re: Codigo VBA para procurar registo

    Mensagem  Noobezinho 14/10/2014, 12:37

    Olá Lilia

    Apesar de nosso idioma ser o mesmo, as vezes ele nos confunde em algumas situações.
    Então gostaria de entender melhor o que pretende:

    Formulário Principal: formulário_oftaData
    Subformulário desse formulário: Não disse o nome
    Um outro formulário: formulário_geral

    De acordo com o que escreveu, a operação começa com a pesquisa do sujeito no formulário_geral, e uma vez encontrado o registro desejado
    o mesmo deve ser carregado no fomulário_oftaData, para poder ser inserido algum dado no subformulário.

    Se é isso, o "segredo" está no formulário_geral, então gostaria que descrevesse esse formulário, como pesquisa os nomes e de que forma parece o resultado.

    Gostaria também de saber onde foi colocado essa expressão:
    Forms!formulário_oftaData!Subject_ID=Forms!formulário_geral!Subject_ID.

    Aguardo...

    Nb


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    Lih
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 36
    Registrado : 29/08/2014

    Codigo VBA para procurar registo Empty Re: Codigo VBA para procurar registo

    Mensagem  Lih 14/10/2014, 13:42

    Boa tarde,

    peço desculpa por ser pouco explicita.

    Então é o seguinte:

    Formulário Principal: formulário_geral
    Um outro formulário: formulário_oftaData com o subformulário: subformulário_1

    No formulário_geral estou a usar uma caixa de combinação para fazer a pesquisa do ID do subjeito, mas acredito que não seja a forma mais correcta, não sei bem como fazer essa pesquisa preciso de ajuda nesse aspecto também.

    A expresão: Forms!formulário_oftaData!Subject_ID=Forms!formulário_geral!Subject_ID --> foi colocada no formulário 'formulário_oftaData' 'ao carregar'.


    Agradeço imenso a ajuda.

    Cumprimentos,

    Lilia Jorge
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4145
    Registrado : 29/06/2012

    Codigo VBA para procurar registo Empty Re: Codigo VBA para procurar registo

    Mensagem  Noobezinho 14/10/2014, 14:54

    Lilia

    Experimente coloca o código abaixo na propriedade Ao clicar da caixa de combinação, acreditando que Subject_ID seja o nome dessa caixa de combinação, caso não seja, substitua o Subject_ID no final da expressão pelo nome correto da combobox (caixa de combinação).  


    DoCmd.OpenForm "formulário_oftaData", acNormal, "", "Subject_ID = Forms!formulário_geral!Subject_ID"

    Uma vez feito isso, quando clicar no ID da caixa de combinação, irá abrir o formulário formulário_oftaData já com os dados do sujeito  do ID escolhido.

    Vou deixar o link de um exemplo de formulário de pesquisa, se tiver interesse, baixe e estude-o.

    O link é esse exemplo da mensagem 19.

    Comprimentos

    Nb


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    Lih
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 36
    Registrado : 29/08/2014

    Codigo VBA para procurar registo Empty Re: Codigo VBA para procurar registo

    Mensagem  Lih 14/10/2014, 15:02

    Para abrir o formulário_oftaData estou a utilizar um grupo de opções (que abre o formulário de acordo com o tipo de dados que se pretende introduzir), por isso não posso utilizar a caixa de combinação para abrir directamente o formulário.


    Muito Obrigada.

    Cumprimentos,

    Lilia Jorge


    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4145
    Registrado : 29/06/2012

    Codigo VBA para procurar registo Empty Re: Codigo VBA para procurar registo

    Mensagem  Noobezinho 15/10/2014, 15:10

    Então Lilia


    Ao invés de colocar o código vba na caixa de combinação, coloque-o no grupo de opções.


    Noob


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

      Data/hora atual: 27/1/2022, 00:32