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

    [Resolvido] Abrir formulário a partir consulta prévia.

    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 21/9/2016, 16:38

    Boa tarde, pessoal!

    Vou tentar me expressar da melhor maneira possível para que vocês possam entender o problema. Seguinte... Eu gostaria de abrir um formulário em um determinado registro a partir do click em um resultado de uma consulta. Tipo... eu criei uma consulta para mostrar todos os exames de um determinado paciente. É exibida somente as datas das consultas e quando eu quiser ver uma consulta específica, eu clico na data e automaticamente ele abre o formulário no registro específico. Eu consegui fazer para abrir o formulário de exames. Mas independente da data q eu clique, ele sempre abre no primeiro registro do formulário exames. Eu não sei como fazer um código para capturar informações de onde estou clicando. Alguém pode ajudar?

    Desde já agradeço.


    Abraço.


    Última edição por alencarti em 23/9/2016, 14:39, editado 1 vez(es)
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Abrir Form,ulario apartir de consulta previa.

    Mensagem  Ney Santos 21/9/2016, 16:51

    Boa tarde!

    Faça o o seguinte, voce deve rira um form baseado nessa consulta Para abrir o form. no registro expecificado
    informando a ele o ID dessa consulta. Vou mostrar um exemplo parecido disso
    Private Sub Comando253_Click()
    On Error GoTo Err_Comando253_Click
    DoCmd.OpenForm "PedCli", acNormal, , , acFormEdit
    Forms!PedCli.Cliente = Forms![Orcamento].[Selecionar Nome].Column(1)
    Forms!PedCli.Requery

    Exit_Comando253_Click:
    Exit Sub

    Err_Comando253_Click:
    MsgBox Err.Description
    Resume Exit_Comando253_Click

    End Sub
    Explicando: O botão Comando253 abre O Form"PedCli", porem ao abrir eu informo ao access que o codigo do Cliente que quero visualizar
    é o mesmo que está selecionado no form que esta aberto.
    No seucaso voce pode criar um form continuo e colocar o codigo no evendo ao clicar 2 vezes.
    qualquer duvida masnda uma parte do bd que mostropara voce.

    Att
    Ney Santos
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 21/9/2016, 18:49

    Agradeço muito! Vou analisar o código que você mandou e depois dou um feedback.

    Abraço.

    Edit: Como você pode ver na imagem, criei um formulário que mostra as consultas realizadas pelo paciente que eu escolher através da caixa de combinação. Os resultados aparecem abaixo em um subformulário. Aparece somente código do atendimento e a data. O que quero é que quando eu clicasse, por exemplo, na data 21/09/2016, ele abrisse o formulário da consulta com ID 7, que é a consulta do paciente selecionado na data selecionada, entendeu?

    Agradeço mais uma vez pela atenção.


    Última edição por alencarti em 21/9/2016, 20:09, editado 1 vez(es)
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 21/9/2016, 19:04

    FICO NO AGUARDO
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 21/9/2016, 20:26

    Mandei a resposta no meu segundo post.
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 22/9/2016, 13:00

    Bom pelo print vejo que seu campo chave é o Cod_Atendimento certo?
    Pelo que voce falou voce ja abre o formulário desejado. oque está falatando e voce indicar qual registro
    voce quer abrir. altere seu código para a seguinte forma:

    DoCmd.OpenForm "Nome do form que quer abrir", acNormal, , , acFormEdit
    Forms!Nome do form que quer abrir.Nome do Campo Chave = Forms![Nome do form desse print].[Cod_Atendimento]
    Forms!Nome do form que quer abrir.Requery

    Att

    Ney
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 22/9/2016, 13:41

    Bom dia!

    Fiz o seguinte comando a partir do que me passou:

    Private Sub Cod_Atendimento_Click()
    DoCmd.OpenForm "Anamnese", acNormal, , , acFormEdit
    Forms!Anamnese.Cod_Atendimento = Forms![CadPaciente1].[Cod_Atendimento]
    Forms!Anamnese.Requery
    End Sub

    Porém ao clicar no cod_atendimento que quero abrir ele retorna o seguinte erro e abre o formulário anamnese no primeiro registro feito na tabela.

    Erro em tempo de execução '2465':

    O microsoft access não pôde localizar o campo '|1' referido em sua expressão.
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 22/9/2016, 14:17

    vc pode postar um exemplo do seu bd pra verificar,
    pela mensagem um dos campo pode ter nome diferente..
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 22/9/2016, 14:41

    Muito obrigado, Ney!

    Vou quebrar a cabeça um pouco aqui.

    Vc quer que eu poste minhas tabelas aqui?
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 22/9/2016, 14:50

    poste apenas parte do bd
    que tenha seus forms em questão e as tabelas que utilizam eles
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 22/9/2016, 15:20

    Anexei meu arquivo. Se você puder dar uma olhada, agradeço. Acho que assim é a forma mais fácil de você entender a situação geral.


    Grato.
    Anexos
    [Resolvido] Abrir formulário a partir consulta prévia. AttachmentClínica.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (130 Kb) Baixado 14 vez(es)
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 22/9/2016, 15:58

    Boa Tarde!
    Segue seu bd atualizado.
    Anexos
    [Resolvido] Abrir formulário a partir consulta prévia. AttachmentClínica.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (42 Kb) Baixado 43 vez(es)
    avatar
    alencarti
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/09/2016

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  alencarti 22/9/2016, 16:11

    Muito obrigado! Como faço pra te pagar uma cerveja? rsrsrs..

    Somente para fins didáticos. Você inseriu um botão e nele uma macro, certo?


    Abraço.
    Ney Santos
    Ney Santos
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 350
    Registrado : 23/05/2011

    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Ney Santos 22/9/2016, 20:38

    sim
    Era a manenira mais facil

    Nao esqueça de dar comoresolvido paar encerrar o post

    Conteúdo patrocinado


    [Resolvido] Abrir formulário a partir consulta prévia. Empty Re: [Resolvido] Abrir formulário a partir consulta prévia.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 04:49