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

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    avatar
    JOSEMORAES
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 197
    Registrado : 23/02/2011

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  JOSEMORAES em 14/7/2015, 14:10

    Olá Pessoal, preciso de uma ajuda de vocês. Preciso de uma forma de concatenar um registro de informações em uma consulta estilo referenia cruzada,





    Em uma tabela eu tenho registros como:

    Data              Setor  OS
    01/01/2015   A  00001/2015
    01/01/2015        A  00002/2015
    01/01/2015        B  00001/2015
    01/01/2015        B  00002/2015
    02/01/2015        B  00003/2015
    02/01/2015        C  00003/2015
    02/01/2015        C  00002/2015
    02/01/2015        D  00003/2015
    03/01/2015        A  00003/2015
    04/01/2015        B  00004/2015
    04/01/2015        B  00005/2015
    04/01/2015        B  00006/2015
    05/01/2015        C  00004/2015
    05/01/2015        D  00001/2015

    E preciso consultar uma forma de enxergar esses registros da seguinte maneira

    Concatenar as OS por setor dentro da data

    Estou enviando em anexo um exemplo em excel para ter uma visão melhor do que eu preciso.

    Mas é em access que eu preciso.

    que puder me ajudar eu agradeço muito

    Obrigado
    Anexos
    Anexos
    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) AttachmentExemplo.xlsx
    Você não tem permissão para fazer download dos arquivos anexados.
    (12 Kb) Baixado 42 vez(es)


    .................................................................................
    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) 10715412
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  Clebergyn em 15/7/2015, 03:12

    avatar
    JOSEMORAES
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 197
    Registrado : 23/02/2011

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  JOSEMORAES em 15/7/2015, 13:37

    Olá.

    Perfeito, muito obrigado pela sua ajuda.

    Agradeço muito.


    .................................................................................
    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) 10715412
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  Clebergyn em 15/7/2015, 14:46

    avatar
    JOSEMORAES
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 197
    Registrado : 23/02/2011

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  JOSEMORAES em 15/7/2015, 16:52

    Ficou perfeito.

    Vou tentar adaptar para um dashboard, pois as colunas ficaram meio grande, onde o "Concluído" ficaria com um simbolo Verde e o "Processo" ficaria com um simbolo em vermelho.

    Mas muito obrigado, vou tentar fazer essa adpatação.



    .................................................................................
    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) 10715412
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7737
    Registrado : 05/11/2009

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  Alexandre Neves em 22/7/2015, 22:03

    Lembre-se do Resolvido


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    janettepires
    janettepires
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 126
    Registrado : 14/03/2013

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  janettepires em 14/4/2018, 16:35

    Bom dia!

    Esse exemplo é quase perfeito para o que eu preciso o problema é que se colocar só o MES referente a data, a consulta referencia cruzada agrupa.

    Alguem poderia me ensinar uma forma de não agrupar.


    Obrigada

    Janette
    janettepires
    janettepires
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 126
    Registrado : 14/03/2013

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  janettepires em 15/4/2018, 21:58

    Adaptei a função para coluna e funcionou.

    Function conc(dt As String, se)
    On Error GoTo g1
    Dim rs As DAO.Recordset, texto As String, i

    Set rs = CurrentDb.OpenRecordset("SELECT [tbleventos].obs FROM tbleventos Where [tbleventos].mes like '" & dt & "' and [tbleventos].setor='" & se & "'")
    i = 1
    Do While Not rs.EOF
    If i = 1 Then
    texto = rs("obs") & "***"
    Else
    texto = texto & vbNewcolumn & rs("obs") & " "
    End If
    i = 2
    rs.MoveNext
    Loop

    rs.Close
    CurrentDb.Close
    Set rs = Nothing
    conc = texto
    Exit Function
    g1: MsgBox Err.Description

    End Function
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2293
    Registrado : 22/11/2016

    Concatenar e agrupar por datas estilo referencia cruzada (access 2013) Empty Re: Concatenar e agrupar por datas estilo referencia cruzada (access 2013)

    Mensagem  DamascenoJr. em 11/3/2020, 02:17

    José, conseguiu fazer a adaptação? Se sim, não esqueça o resolvido do tópico.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 21/10/2020, 12:00