Bom dia Rodrigo

Fiz o que vc pediu usando fórmulas.
A planilha já tem fórmulas até a linha 300 da planilha como vc pediu.

Baixe a planilha e veja se é isto que vc precisa:

Dê retorno.

Se a resposta foi útil, clique na mãozinha que fica ao lado da feramenta Citar.

Um abraço.

Bom dia!!

Segue minha contribuição via VBA.

Sub TestAleVBA()
Dim x, y(), i&, j&, k&, n&, s$

x = Range("A2:B" & Cells(Rows.Count, 1).End(xlUp).Row).Value
ReDim y(1 To UBound(x), 1 To 2)

On Error Resume Next
With New Collection
    For i = 1 To UBound(x)
        s = Trim$(x(i, 1))
        If Len(s) Then
            If IsEmpty(.Item(s)) Then
                k = k + 1: y(k, 1) = s: y(k, 2) = x(i, 2)
                .Add k, s
            Else
                n = .Item(s): y(n, 2) = y(n, 2) + x(i, 2)
            End If
        End If
    Next i
End With

If k > 1 Then [e2:f2].Resize(k).Value = y
End Sub

Bom dia
Obrigado amigos, é impressionando o que se pode fazer no excel e vba, eu que nao tenho conhecimento da area fico impressionado mesmo.
As duas opções funcionaram perfeitamente, vou ver qual fica melhor para utilizar para o fim que preciso, porem as duas funcioram sim, perfeitamente.

obrigado a todos.

Amigos, desclpas , mas quando fui fazer surgiu um imprevisto ao junto com o nome teria que puxar o codigo do vendedor tambem que fica em uma coluna antes, entendeu? ou seja teria que no resultado deveria retornar o codigo, nome e valor.
será possivel?
tentei adptar o macro e a formula, mas por nao conhecer de programação nao consegui, se pudesse comentar o codigo para caso eu precise adptar eu agradeço.

novamente obrigado.

Boa tarde Rodrigo.

Não precisa se desculpar, estamos aqui para ajudar.

Baixe a planilha e veja se é isto:

Dê retorno.

Um abraço.

Mais uma vez obrigado.
DEu certinho para a finalidade que preciso.

Forte abraço.