Boa tarde!
Por gentileza , alguem poderia me dizer como faço para excluir nº de uma coluna deixando apenas o primeiro.(exemplo se são 3 linhas repetidadas quero que fique o nº apenas da 1º),porem excluir apenas se as linhas forem repetidas caso não permaneça o mesmo.
Tenho o código abaixo porém ele excluir obedecendo apenas a coluna, eu qro que obedeça a linha.
'Excluir nº duplicado na coluna deixando apenas o 1º
Sub blankOutDuplicates()
' Assumindo que o range de dados inicie-se na célula 'C1'
Dim rng As Range
If Range("C1") = "" Then Exit Sub
If Range("C2") = "" Then Exit Sub
Set rng = Range("C1").End(xlDown)
Do Until rng.Row = 1
If rng.Value = rng.Offset(-1).Value Then
rng.ClearContents
End If
Set rng = rng.Offset(-1)
Loop
End Sub
obrigado.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 22/07/2011 10:09 am