Qual a melhor lógica que posso utilizar?

Question

Eu tenho esse codigo (mostrando apenas uma parte embaixo, pq e repetitivo)

                    

Sheets("Cálculo").Select

    While Len(Range("A" & CStr(r)).Value) > 0
    Sheets("Cálculo").Select

    If Range("L" & CStr(r)).Value = "Cobrança" Then

    Range("A" & CStr(r) & ":" & "K" & CStr(r)).Copy

    Sheets("Relatorios").Select
    Range("A" & CStr(novalinha)).Select
    Selection.PasteSpecial Paste:=xlPasteValues

    novalinha = novalinha + 1

Copio para outra planilha os clientes que tem o critério desejado, nesse caso, "Cobrança" na coluna L. mas eu tenho alguns clientes que tem mais de um registro, eu gostaria que o código checasse se o cliente já foi copiado, e se ele já estiver na lista, apenas some o valor atual com o valor antigo. Não sei como fazer isso sem um código burro muito grande.

Answer 1

Nestes vídeos vai encontrar vários exemplos das diversar formas possíveis. 

https://www.youtube.com/results?search_query=excel+vba+copiar

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]