MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Separar Registros por Faixa Etária

    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 16:00

    Tenho a consulta:
    SuaIdade: MostraIdade([Data de Nascimento]) (exemplo de Idade JP)
    Conseguido atraves do Módulo:

    Public Function MostraIdade(VariavelA As Variant, Optional VariavelB As Variant) As Variant
    Dim DataA As Date
    Dim DataB As Date
    Dim DataC As Date
    Dim strSQL As String
    MostraIdade = Null

    If IsDate(VariavelA) Then
    DataA = VariavelA

    If Not IsDate(VariavelB) Then
    DataB = Date
    Else
    DataB = VariavelB
    End If

    If DataB >= DataA Then
    DataC = DateSerial(Year(DataB), Month(DataA), Day(DataA))
    MostraIdade = DateDiff("yyyy", DataA, DataB) + (DataC > DataB)
    End If
    End If

    End Function

    Agora.. O que preciso e que na consulta ou em um código..
    Me retorne a Faixa etaria...

    Assim Entre 30 e 40 Anos...
    Os registros que tiverem entre essa idade seja marcado em um campo na consulta.. para eu poder usar esse grupamento em um relatorio

    Se puderem ajudar fico grato
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 16:05

    Seria algo assim..
    Se o individou tiver 35 anos.. em um campo nao acoplado na cns mostrar 30/40
    se 25 : 20/30 e assim sucessivamente
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  vieirasoft em 3/6/2011, 16:14

    Não consegues fazer isso em VBA? Tipo: If....Then ...ElseIf...
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  criquio em 3/6/2011, 16:19

    Talvez assim:

    Me.NomeDoCampo = Left(Me.NomeDoCampo, 1) & 0 & "/" & Left(Me.NomeDoCampo, 1) + 1 & 0

    Nesse caso não entraria pessoas com mais de 90 anos. Se entrar, precisará alterar.


    Última edição por criquio em 3/6/2011, 16:20, editado 1 vez(es)


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

    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 16:19

    No form seria facil...
    mas pretendo em um relatorio baseado em uma consulta com as idades...
    Tenho que apresentar um relatorio por faixa etaria,..
    Se tenho 100 Detentos
    x estao entre 20 e 30
    n estao entre 30 e 40
    e assim sucessivamente
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  criquio em 3/6/2011, 16:23

    Outra ideia poderia ser você fazer isso em um campo calculado de uma consulta e criar o relatório agrupado pela faixa etária.


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

    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 16:28

    Criquio a sua expressão em um form funcionou perfeitamente..
    mas o que quero e como explicado ai acima .. de uma olhadinha por favor
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 16:29

    E isso que quero.. um campo de consulta calculado.. me dando o valor como consegui no form com essa expressão sua..
    Grato
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10605
    Registrado : 04/11/2009

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  JPaulo em 3/6/2011, 16:32

    Já fiz isso mesmo neste fórum o ano passado, é só dar uma procurada.

    É feito com a função Seimed (IIf).


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Instruções SQL como utilizar...
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 17:20

    Grande JP, sabe me informar apenas se em VB ou em consultas?
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10605
    Registrado : 04/11/2009

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  JPaulo em 3/6/2011, 17:21

    Veja o simples na consulta.

    Download

    Bom final de semana.


    Última edição por JPaulo em 8/10/2020, 14:12, editado 1 vez(es)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Instruções SQL como utilizar...
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  HARYSOHN em 3/6/2011, 17:28

    Simplesmente sou Fã dos seus... Veja o Simples..
    rsrs
    Grato amigão..
    Bom Final de Semana
    avatar
    johnaccess
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 01/11/2010

    [Resolvido]Separar Registros por Faixa Etária Empty Faixa etária

    Mensagem  johnaccess em 7/10/2020, 11:18

    Alguém aí ainda tem o exemplo ?
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10605
    Registrado : 04/11/2009

    [Resolvido]Separar Registros por Faixa Etária Empty Re: [Resolvido]Separar Registros por Faixa Etária

    Mensagem  JPaulo em 8/10/2020, 14:12

    Link a funcionar, bons estudos.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Separar Registros por Faixa Etária Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 25/11/2020, 02:56