prezado

você quer contagem ou soma de valor?

por favor poste uma planilha com poucas linhas simulando o resultado esperado no sendspace. Facilita pra gente fazer a solução adequada para seu problema.

Fantin,

Boa tarde!

Fiz uma pequena função (UDF) em VBA que pode resolver seu problema, independente da quantidade de linhas que tenha seu arquivo. Apenas alguns detalhes que devem ser observados, da forma que programei, para que funcione corretamente na sua máquina. Você deva fazer igual:
1 - Imaginei que o código das mangueiras está na coluna A e que começam a partir da linha 2 (após o cabeçalho);
2 - Imaginei que as quantidades estejam na coluna B a partir da linha 2 (após o cabeçalho);
3 - Imaginei que a aba onde estão esses dados se chama Plan1;

Isso posto, abra o editor do VBA (ALT + F11) e insira um módulo lá (Menu Inserir/Módulo);
4 - Na janela que surgiu, insira o código abaixo:

Function ContarQtde(Mangueira As String) As Long
    Dim i As Long
    Dim UltimaLinha As Long
    Dim Contar As Long
    
    UltimaLinha = Sheets("Plan1").Cells(Cells.Rows.Count, 1).End(xlUp).Row
    If UltimaLinha < 2 Then UltimaLinha = 2
    
    For i = 2 To UltimaLinha
        If Range("A" & i).Value = Mangueira Then
            Contar = Contar + 1
        End If
    Next i
    
    ContarQtde = Contar
End Function

5 - Salve e feche o VBA e pode usar a função como uma outra qualquer nativa do próprio Excel.

wagner

implantei sua solução mas não entendi como faz para executar

VEJA SE E ISSO QUE VC QUER

https://www.sendspace.com/file/4z5ihk

CONTAGEM.XLSM

rilust,

Boa noite!

Basta utilizar, na própria interface do Excel, como se fosse uma função nativa do Excel. Ou seja, em uma célula qualquer do Excel digite = ContarQtde e passe como parâmetro a célula que contém o código da Mangueira. Por Exemplo: = ContarQtde(A2).