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]usar caixa de combinação como critério da consulta.

    avatar
    AndreMeneghin
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 06/10/2013

    [Resolvido]usar caixa de combinação como critério da consulta. Empty [Resolvido]usar caixa de combinação como critério da consulta.

    Mensagem  AndreMeneghin 23/11/2016, 11:29

    Pessoal Bom Dia,

    Primeiramente sou novo no fórum, então peço desculpas antecipadamente por qualquer equivoco de minha parte.

    Pesquisei no fórum porém não encontrei nenhum tópico que solucionasse meu problema, não sou totalmente leigo, mas também não sou expert, de qualquer forma até achei tópicos sobre o assunto mas nenhum com a resolução que eu preciso, por isso decidi abrir um novo. O problema é o seguinte, eu estou desenvolvendo uma agendinha telefônica simples pro meu trabalho. Eu preciso que ela cadastre prestadores de serviço e além dos dados do contato ela também registre que tipo de serviço aquele prestador faz (Pedreiro, Encanador, etc) Até ai tudo bem, criei uma tabela e quatro formulários. Um formulário para cadastrar o prestador, outro para consultar um prestador pelo seu nome e um menu principal para dar acesso a estes formulários. O problema está no quarto formulário, eu gostaria de selecionar um serviço no menu principal e ai ele me mostrar uma lista de todos os prestadores de serviço que prestam aquele serviço. Ex. eu seleciono Pedreiro e eme me mostra o contato de todos os pedreiros e ainda, assim que eu clicar em algum deles ele me mostre a ficha completa para aquele prestador. Tentei até criar um relatório para ver se facilitava mas não consegui do mesmo jeito. Este é o meu problema até o momento, gostaria de saber se alguém pode me ajudar a resolver. Tem mais um detalhe, quando eu pesquiso pelo nome ele retorna o formulário preenchido certinho com o contato que eu quero. Porém quando digito um nome que não existe ele mostra o formulário em branco, sem valores e sem os campos. Gostaria que quando não encontrasse o registro ele exibisse uma mensagem de erro informando que não foi encontrado prestador.

    Enfim são estes os meus problemas, se alguém puder me ajudar agradeceria muito! Espero não ter alongado demais a minha explicação, mas coloquei todas as in formações que achei necessário.



    Segue o Banco de dados:
    Anexos
    [Resolvido]usar caixa de combinação como critério da consulta. AttachmentAgenda.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (301 Kb) Baixado 14 vez(es)
    Caio
    Caio
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    [Resolvido]usar caixa de combinação como critério da consulta. Empty Re: [Resolvido]usar caixa de combinação como critério da consulta.

    Mensagem  Caio 23/11/2016, 18:23

    Boa tarde AndreMeneghin

    Faça assim,

    1 Crie uma tabela Somente com os Serviços (Pedreiro, Elestricista... etc.)
    2 No Menu crie botões para cada serviço ou uma combox para lista-los.
    3 Crie uma caixa de texto não acoplada no Menu e renomeia de txt_grupo
    3 No evento ao clicar do Botão ou no alterar da Combox:

    Código:
    Private Sub BtnPedreiro_Click()
    Me.txt_grupo = "Pedreiro"
    DoCmd.OpenForm "fml_servicos"
    End Sub

    4 No evento ao abrir do fml_servicos crie uma caixa de listagem e como origem coloque o prestadores de serviços
    5 Crie um campo no fml_servicos e renomeie de txt_grupo
    6 No evento ao abrir do fml_servicos coloque:

    Código:
    Private Sub Form_Open(cancel As Integer)
    Forms!Menu.txt_grupo = Forms!fml_servicos.txt_grupo
    End Sub

    7 Nos critérios da consulta da caixa de listagem coloque:

    Como [forms]![fml_servicos].[txt_grupo] & "*"

    Até aqui vai estar fazendo o filtro no fml_servicos de acordo com o botão pressionado no Menu.

    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]usar caixa de combinação como critério da consulta. Empty Re: [Resolvido]usar caixa de combinação como critério da consulta.

    Mensagem  Noobezinho 23/11/2016, 20:13

    Olá André.

    Dado o meu pitaco  Razz

    Caso prefira, sugiro que veja esse exemplo de pesquisa.

    maximoaccess.com/t21906-formulario-para-pesquisas#159303

    (copie e cole no endereço do navegador)

    Ele foi feito com base num cadastro de mascotes de uma clínica veterinária.

    Pode-se substituir o cliente(Pet) do formulário com o nome e dados principais dos prestadores de serviços

    Baixe o exemplo e abra o frmPesquisa.

    Embora a caixa de texto esteja escrita pesquisa por nome, pode-se digitar o que quiser que será filtrado.

    Experimente digitar algum nome de cliente, depois um nome de espécie, e por raça, então irá verificar

    que o resultado ficará colorido.

    Teste o formulário e verá que terá toda pesquisa necessária em apenas um formulário.

    Nesse formulário ou em outro que fizer para retornar a relação de prestadores de serviços, seja por profissão ou outro filtro

    qualquer, deverá fazer uma função para abrir o formulário de dados do prestador (sei que tem o form de cadastro, que é

    apenas para adicionar novos registros).

    Crie o formulário, e na consulta da origem de registro, coloque o critério na coluna do codigoDoPrestador =frmPesquisa!codigoDoPrestador.

    Desse modo, esse formulário irá abrir somente com os dados do prestador em que foi clicado no frmPesquisa.

    Com o formulário feito, crie essa função, por exemplo:

    Function Abreform()

    Docmd OpenForm "frm_Prestadores", ......blabla

    End function


    No formulário frmPesquisa, na folha de propriedades de cada caixa de controle(você pode selecionar todas de uma vez)
    na propriedade Ao clicar 2 vezes, digite  =AbreForm()

    Pronte, teste e veja se deu certo, dúvidas retorne

    [ ]'s


    .................................................................................
    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
    AndreMeneghin
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 06/10/2013

    [Resolvido]usar caixa de combinação como critério da consulta. Empty Re: [Resolvido]usar caixa de combinação como critério da consulta.

    Mensagem  AndreMeneghin 25/11/2016, 18:09

    Pessoal, Muito Obrigado a todos! depois de muito suor, esforço e pesquisa, e graças a dica de vocês claro, consegui finalizar o trabalho! a agenda ficou ótima e do jeito que eu queria! Irei disponibilizar para download para que outras pessoas possam utilizar como modelo, ou para aprendizado. Muito Obrigado a todos.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]usar caixa de combinação como critério da consulta. Empty Re: [Resolvido]usar caixa de combinação como critério da consulta.

    Mensagem  Noobezinho 25/11/2016, 18:16

    Que bom que conseguiu, Andre!

    Valeu pelo retorno!

    Boa sorte!


    .................................................................................
    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: 10/8/2022, 17:20