Página 1 de 1

Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 10:42
por engrocha
Bom dia!
Preciso de uma fórmula que liste as ocorrências usando como critério o dia, porém, sem repetir ocorrências iguais.
Mais detalhe e melhor compreensão do problema está no anexo.

Grato,
Rocha.

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 12:53
por FelipeMGarcia
Amigo,

Veja se o que fiz lhe ajuda, caso queira agradecer, clique na mãozinha.

Eu usei a função UNIRTEXTO, caso não tenha, me avise, que mando a função personalizada (UDF) para que consiga usar.

Abs

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 12:59
por Deciog

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 13:43
por Jimmy
Olá,

A solução anexa é por macro. Para aciona-la segure SHIFT+CTRL, e tecle Q.

Que tal colocar a quantidade de ocorrências dos repetidos?

Em vez de assim:
Elétrico / Mecânico / Falha Operador / Quebra Correia / Freio Danificado / Sujeira
assim:
Elétrico / Mecânico (2) / Falha Operador / Quebra Correia / Freio Danificado / Sujeira

Que tal fazer também uma tabela invertida: em vez de Dia X Ocorrências, fazer uma Ocorrência X Dias, para mostrar os defeitos mais recorrentes, e atuar sobre eles?

Jimmy San Juan

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 16:21
por engrocha
[quote="FelipeMGarcia"]Amigo,

É quase isso... Veja na primeira linha a ocorrência Elétrica apareceu 2 vezes.
Preciso que as ocorrências sejam listadas desconsiderando as repetidas.

Grato,
Rocha.

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 17:17
por engrocha
Jimmy, boa tarde!
Achei válido e funcional a sua representação em VBA, porém, ao tentar alterar o código para o mesmo colar os valores em outra guia não consegui desenvolver o raciocínio.

Pode alterar o mesmo por favor de modo a fazer conforme o novo modelo?

Desde já agradeço,
Rocha.

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 17:32
por FelipeMGarcia
Amigo,

Veja se agora está do jeito que precisa, eu tive que usar coluna auxiliar pra fazer.

Caso queira agradecer, clique na mãozinha.

abs

Re: Listar ocorrências de acordo com o dia

Enviado: 15 Jul 2019 às 19:42
por Jimmy
Eu alterei de forma a separar as planilhas.

No início da macro há o código abaixo, que serva para definir os locais, tanto para o Bando de Dados, como para as Ocorrências.
Código: Selecionar todos
   'Locais da parte de Banco de Dados (BD)
    Set PlanBD = Sheets("BD")
    ColDiaBDad = "B"                                                  'Coluna de dias
    ColDefBDad = "D"                                                  'Coluna de defeitos
    LinIniBDad = 3
    LinFimBDad = PlanBD.Range(ColDiaBDad & Rows.Count).End(xlUp).Row  'Linha final de dias
    
   'Locais da parte de OCORrencias
    Set PlanOc = Sheets("Ocorrências")
    ColDiaOcor = "B"                                                  'Coluna de dias da relação agrupada
    ColOcoOcor = "C"                                                  'Coluna de ocorrências agrupadas
    LinIniOcor = 3
    LinFimOcor = PlanOc.Range(ColDiaOcor & Rows.Count).End(xlUp).Row  'Linha final de dias
Ali você especifica os nomes das planilhas, as colunas que contém as datas, os defeitos e as ocorrências, bem como a linha em que essas informações iniciam. A linha final é obtida automaticamente pela última célula preenchida das colunas de dias.
Que tal colocar a quantidade de ocorrências dos repetidos?

Em vez de assim:
Elétrico / Mecânico / Falha Operador / Quebra Correia / Freio Danificado / Sujeira
assim:
Elétrico / Mecânico (2) / Falha Operador / Quebra Correia / Freio Danificado / Sujeira

Que tal fazer também uma tabela invertida: em vez de Dia X Ocorrências, fazer uma Ocorrência X Dias, para mostrar os defeitos mais recorrentes, e atuar sobre eles?
Você não comentou sobre isso.

Jimmy San Juan