Imagino que vc tenha as vendas registradas em algum local, se sim seria bem mais produtivo, (dependendo do tamanho do arquivo, faz uma grande diferença), usar um cont.se para registar a quantidade de vendas para cada cliente, mas isso é uma opção que vc deve analisar, pessoalmente eu faria dessa forma.
Qto ao VBA para contar basta criar um contador
Segue abaixo um exemplo com base nos dados que vc disponibilizou
Sub Contador()
Dim WC, WR As Worksheet
Dim Cont As Long
Dim Loja As String
Application.ScreenUpdating = False
Set WC = Worksheets("CLIENTE")
Set WR = Worksheets("RESUMO")
Loja = WR.Range("C3").Value
WC.Select
WC.Range("B2").Select
Do While ActiveCell <> ""
If ActiveCell = Loja Then
ActiveCell.Offset(0, 2).Select
Cont = ActiveCell
Cont = Cont + 1
ActiveCell = Cont
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
WR.Select
Application.ScreenUpdating = True
End Sub
Marcelo Prudencio
Microsoft Excel Brasil no Facebook
"Começar já é a metade do caminho."
Autor Desconhecido
Simplifica que simples fica.
Nicole Tomazella.
"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.
Postado : 02/01/2016 9:19 am