Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Contar linhas abaix...
 
Notifications
Clear all

Contar linhas abaixo se identificar uma certa string

 
2024 - VBA & Macros
Post Recente por Wagner Morel 7 anos atrás
5 Posts
3 Usuários
0 Reactions
993 Visualizações
RSS
 Giuliano06
(@giuliano06)
Posts: 3
New Member
Topic starter
 

Bom dia pessoal.

Não estou conseguindo criar uma macro que conta as linhas caso encontre uma determinada String.
Por exemplo:
Tenho uma planilha com 4 grupos: (Yellow,Blue,Green, N/A)
Eu preciso fazer a contagem de quantos itens tem abaixo do título Yellow, quantos itens abaixo do titulo Blue e assim por diante.

Exemplo de Planilha:

Yellow
ITEM 1
ITEM 2
ITEM 3
ITEM 4
ITEM 5
Blue
ITEM 1
ITEM 2
ITEM 3
Green
ITEM 1
ITEM 2
ITEM 3
ITEM 4
ITEM 5
ITEM 6
ITEM 7
N/A
ITEM 1

Com isso a macro deveria retornar que são 5 itens Yellow, 3 Blue, 7 Green e 1 N/A

Conseguiriam me ajudar por favor?

 
Postado : 03/05/2018 5:49 am
 klarc28
(@klarc28)
Posts: 971
Prominent Member
 

ANEXO

 
Postado : 03/05/2018 6:13 am
 Giuliano06
(@giuliano06)
Posts: 3
New Member
Topic starter
 

klarc28, obrigado pela ajuda.
Porém ainda tem um ponto que estou tendo problemas.
A sua programação você fez para que em cada grupo, ele contasse enquanto achasse a palavra ITEM.
Porém, os meus itens serão com nomes distintos.
Com isso fiz uma alteração no seu codigo para contar os itens abaixo de cada grupo (Yellow,Blue,Green e N/A) independente do nome.
Agora estou com problema onde a única contagem que não está certa é a do grupo Blue.
Consegueria me ajudar?

 
Postado : 03/05/2018 7:50 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Giuliano06,

Bom dia!

Pedimos, por gentileza, não utilizar citações de inteiro teor das mensagens que lhe são respondidas. Citações, quando estritamente necessárias ao entendimento da mensagem que você quer enviar, devem ser de apenas trechos das mensagens.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 03/05/2018 8:11 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Giuliano06,

Apenas um pequeno ajuste no código. Segue.

CONTAR STRINGS.zip

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 03/05/2018 8:34 am
Forum Jump:
  Tópico Anterior
Próximo Tópico