Adaptar código ao gerar reletorio

Boa Noite

Alguém poderia me ajudar com este código???.

Não manjo muito de VBA por isso recorro aos experts.

Criei está planilha olhando tutoriais e fóruns, mas não estou conseguindo adaptar este código .

Quero que quando ele puxe as informações da planilha que ele some o que for igual e mantem os valores.

A imagem 1 mostra como ele gera o relatório e a imagem 2 mostra como quero que seja se for possível.

E também gostaria  que fosse feito a soma da coluna na textbox.

Vendas seja somado a coluna Valor Total e nas Compras a coluna Total

TESTE.xlsm