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


5 participantes

    [Resolvido]Criar consulta para aniversariantes

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 14/2/2012, 18:02

    Senhores do forum, boa tarde!
    Estou criando um banco de dados e preciso criar uma consulta na qual me retorne os aniversariantes do mes cujo nome eu digitar como valor de parâmetro. Por ex.
    ao digitar o mes de DEZEMBRO, deverá retornar todos os aniversariantes do mes de dezembro.
    Já pesquisei no forum e encontrei exemplos e sugestoes inserindo datas nos parâmetros de pesquisa. Preciso que o parâmetro seja o nome do mês.
    A título de informação, o formato do campo data de aniversário do BD é 00/00/0000.
    Assim, solicito a ajuda dos senhores, se possível.
    Atenciosamente
    Oldri
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  criquio 14/2/2012, 18:51

    Basta colocar um campo com formato mmmm.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 14/2/2012, 19:06

    Boa tarde, Criquio.
    Agradeço a atenção.
    Coloco um campo com o formato "mmmm" e fico com os dois campos DataDeNascimento? E aí está pronta a consulta? As sintaxe são as mesmas para o retorno de data? Como fazer a correspondência entre o número do mês e seu nome?
    Atenciosamente
    Oldri
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  criquio 14/2/2012, 19:13

    Supondo que você tenha um formulário de nome frmAniver e nesse formulário tenha uma combo de nome cboMeses com a lista de meses, você coloca um campo na consulta assim:

    MesesExtenso:Format([SeuCampoData];"mmmm")

    No critério desse campo:

    Como Forms!frmAniver!cboMeses

    No evento "Após atualizar" da combo:

    Me.Requery

    Se a combo estiver em formulário e quiser filtrar um subformulário, seria assim no critério do campo:

    Como Forms!NomeDoForm!NomeDoSubform.Form!cboMeses

    e no evento "Após atualizar" da combo:

    Me.NomeDoControleSubform.Requery


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Krauss
    Krauss
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 254
    Registrado : 23/12/2011

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Krauss 14/2/2012, 19:43

    Com a licença do mestre criquio...

    Segue um exemplo em anexo.

    Espero que ajude.


    .................................................................................
    Trabalho com Access 2013

    "A dúvida é o princípio da sabedoria"
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 14/2/2012, 20:07

    Criquio,
    mais uma vez obrigado.
    Desculpe-me pelo desconhecimento. Tenho pouco prática do access.
    Pela sua explicação, eu teria que inserir uma combo contendo os nomes dos meses no formuário já existente. Correto? Então teria que mudar a forma de inserir as datas de nascimento de dd/mm/aaaa, que é em um campo só, para o formato de data normal ccom a mascara de entrada na forma 00->L
    Eu já tenho a tabela pronta e o formulário também. Estou na fase de criar consultas, relatórios e menus. Então lhe pergunto: não existe um código que faça a correspondência dos numeros dos meses, tipo 01 = janeiro, 02 = fevereiro, etc. e implementá-lo na consulta?
    Obrigado
    Atenciosamente
    Oldri

    PS. Obrigado a vc também, Krauss. Vi seu exemplo, mas ele não me dá a opção de escolha ele me informa o aniversario do dia. Pelo que eu pude entender.
    avatar
    Convidad
    Convidado


    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Convidad 14/2/2012, 20:31

    Oldri

    Veja essa sql:


    SELECT tblClientes.NomeCliente, tblClientes.DataNasc
    FROM tblClientes
    WHERE (((Month([DataNasc]))=Month(Date())));

    Mude os nomes da tabela e campos e cole numa nova consulta em modo sql.

    Abraços
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 14/2/2012, 21:20

    Prezado Balem, obrigado pela a atenção.
    A sql funciona. Mas abre a consulta direto. Não dá a opção de digitar qualquer parâmetro (o nome do mês que se quer).
    Penso que tenha que fazer, antes, um código que faça a correspondencia entre número do mês com o nome, como já citado acima.
    De qualquer forma, agradeço-lhe.
    Oldri
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  criquio 14/2/2012, 21:50

    Se a ideia é pedir o nome do mês no momento que abrir a consulta, crie o campo MesesExtenso conforme mencionei e coloque no critério:

    [Digite o mês desejado]

    mas eu gosto de fazer isso conforme mencionei no post anterior, com uma combo ou um campo no formulário. A combo é legal porque evita erros de digitação.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 14/2/2012, 22:21

    Ok, Criquio.
    Agradeço-lhe pelo empenho em ajudar, mas vou desistir. Criar combo meses está descartado. Deixarei da forma em que está.
    Ou seja, usando a sql
    SELECT tbl_GERAL.NomeDoAfiliado, tbl_GERAL.DataDeNascimento
    FROM tbl_GERAL
    WHERE (((tbl_GERAL.DataDeNascimento) Between [digite a data de inicio] And [Digite a data Final]));
    Só que esta instruçao está causando um pequeno entrave: ao digitar as datas, a consilta está buscando todos registros que contem os digitos. Por ex. se digita data inicial 01/01/2012 e final 31/01/2012. retorna todos registros que contenham 01 e 31.
    Vc. saberia o que pode esta causando isto.
    Obrigado
    Oldri
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Avelino Sampaio 15/2/2012, 06:34

    Olá

    SELECT tbl_cadastro.NomeDoAfiliado, tbl_cadastro.DataDeNascimento
    FROM tbl_cadastro
    WHERE Format(DataDeNascimento,"mmmm")=[digite o mês por extenso];

    Ou

    WHERE Format(DataDeNascimento,"mm")=[digite o mês no formato numerico: 01 a 12];


    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 15/2/2012, 10:26

    Prezado Avelino, bom dia!
    Obrigado pela a ajuda. Funcionou perfeitamente. Era exatamente isto que precisava.
    Abusando de sua prestabilidade e onhecimentos, estou com seguinte dificuldade: quando abro a tabela no modo folha de dados, o campo data de nascimento (ou outro campo data/hora) apresenta dos dados em forma de numero e não no formato de data (00/00/0000), ou seja, se digito no formulário a data 01/02/1948, é exibido na tabela o número 17564. Há alguma forma de mudar isto? O motivo da necessidade é que estou tentando colar nestes campos cerca de 5000 datas e não estou conseguindo (retorna formato inválido e penso que possa ser o motivo.
    Contando com a sua atenção, ou de quem souber, aguardo.
    Atenciosamente
    Oldri
    avatar
    Convidado
    Convidado


    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Convidado 17/2/2012, 23:45

    Colega Oldri, você resolveu este tópico e o que pede refere-se a outro assunto, então feche este e abra outro tópico....


    Última edição por cafpr em 23/2/2012, 09:07, editado 1 vez(es)
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 18/2/2012, 00:22

    Colega cafpr,
    atendendo a sua determinação, o tópico foi aberto em outra de categoria. Desculpe o contratempo. Não sei como fechar o tópico, então, senhores, considere-o fechado.
    avatar
    Convidad
    Convidado


    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Convidad 18/2/2012, 00:32

    OLá Oldri

    Veja ali na minha assinatura.

    Boa sorte !!
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  OLDRIVG 4/3/2012, 12:42

    Tópico resolvido.
    Agradeço a todos que dispuseram suas sugestões, reiterando os agradecimentos contidos no post do dia 15/02/2012, às 07:26.
    Atenciosamente
    leogondim26
    leogondim26
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Mensagens : 4
    Registrado : 05/03/2012

    [Resolvido]Criar consulta para aniversariantes Empty Avelino é f*** velho...no bom sentido

    Mensagem  leogondim26 5/3/2012, 10:46

    Comprei o material desse cara, e resolveu quase todas minhas duvidas.

    Conteúdo patrocinado


    [Resolvido]Criar consulta para aniversariantes Empty Re: [Resolvido]Criar consulta para aniversariantes

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 15:58