Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções
Excel VBA Planilhas dados Duplicados deletar |
Este exemplo de Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), obtém-se uma lista de valores únicos
“não duplicados”, fizemos também uma macro para copiar os valores para seu teste vba.
‘Range(“D2:D” & x).RemoveDuplicates (1), xlYes ‘ linha de código que remove duplicados.
Sub sbx_duplicados()
‘Chama o macro que copia valores para o teste
sbx_copiar_teste ‘chama o macro para copiar os valores que serão deletados.
‘conta novamente o total de linhas usada coluna(D)
x = Cells(Rows.Count, “d”).End(xlUp).Row
Cells(1, “f”).Value = “Total”: Cells(2, “f”).Value = x
‘remove duplicados
Range(“D2:D” & x).RemoveDuplicates (1), xlYes
‘conta novamente o total de linhas usada coluna(D)
x = Cells(Rows.Count, “d”).End(xlUp).Row
‘insere a quantidade de valores existente na coluna(D)
Cells(1, “h”).Value = “Unicos”: Cells(2, “h”).Value = x
End Sub
Sub sbx_copiar_teste()
[a].Copy [b]
Range([F2], [h2]).ClearContents
MsgBox “dados copiados para o teste “, vbInformation, “Escola SaberExcel VBA Estudos”
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Adquira o Curso Excel VBA Expert – Escola SaberExcel VBA Estudos |
Compre pelo PayPal | Compre pelo PagSeguro | |
Relação do Material didático: Curso Excel VBA Expert |
Baixe o exemplo de planilha contendo os macros acima: |
SBL Excel VBA – Duplicados deletar |
<< Verifique sua caixa Emails >> Itens Excluídos >> |
Excel VBA – Duplicados deletar