Tomás Vásquez Fórum

Olá amigos do forum estou com um pequeno probleminha e gostaria que vcs mi ajudassem, estou fazendo uma consulta em tabela e o resultado eu quero em uma planilha a colsulta que eu faço é perfeita esta tudo certo eu só quero é que quando eu jogar os dados para a planilha e se tiver nomes repetidos varias vezes, é pra consulta colocar esse nome na planilha só uma vez e deixar a linha limpa onde estiver o nome repedito, exemplo:

PRODUTO VALORUNIT QUANT TOTAL
CAMISA 10,00 2 20,00
CAMISA 10,00 4 40,00
CAMISA 10,00 8 80,00

na consulta eu quero que apareça assim na planilha

PRODUTO VALORUNIT QUANT TOTAL
CAMISA 10,00 2 20,00
10,00 4 40,00
10,00 8 80,00

estou usando esse procedimento que vou deixar a baixo pra vcs olharem ele da certo so não limpa os nome de baixo

Do Until TABELA.EOF

Plan18.Range("A" & i) = TABELA("PRODUTO")
Plan18.Range("B" & i) = TABELA("VALORUNIT")
Plan18.Range("C" & i) = TABELA("QUANT")
Plan18.Range("D" & i) = TABELA("VALORTOTAL")

i = i + 1

TABELA.MoveNext

Loop

desde ja eu agradeço a todos