Como Desproteger uma Planilha do Excel (Um Guia Simples)

Instruções Passo a Passo

Por que usar esse método?

É não destrutivo. Você pode ver os duplicados, investigar por que eles estão lá, e decidir manualmente se deve mantê-los ou excluí-los.

Como usá-lo

1. Clique em qualquer lugar dentro da sua tabela de dados.

   2. Vá para a aba Dados na Faixa de Opções.

3. No grupo Ferramentas de Dados, clique em Remover Duplicados.

4. Selecione Colunas: Uma janela surgirá perguntando quais colunas verificar.

• Por exemplo, se você quisesse deletar emails repetidos, você selecionaria somente "Email," o Excel deletará qualquer linha onde o email está repetido.

• Se você selecionar todas as colunas, o Excel só deletará uma linha se cada célula nessa linha for uma correspondência exata para outra linha.

5. Clique em OK. O Excel dirá quantos valores duplicados foram encontrados e removidos. Também dirá quantos valores únicos permanecem.

Dica Profissional: Sempre copie seus dados para uma nova planilha antes de usar essa ferramenta. Uma vez que os duplicados são removidos e o arquivo é salvo, você não pode "desfazer a exclusão" facilmente se perceber mais tarde que alguns eram entradas legítimas.

A Lógica

A função COUNTIF conta quantas vezes um valor específico aparece em um intervalo. Se essa contagem for maior que 1, você tem um duplicado.

Como Implementar

=COUNTIF(B:B, B2)

=COUNTIF(B:B, B2)

This appears to be an Excel formula rather than C# code. If you have C# code that interacts with Excel or a specific C# snippet you'd like converted, please provide that code for conversion to VB.NET.

Fórmula Avançada: Destacando Apenas a Segunda Ocorrência

Se você quiser manter a primeira ocorrência de um nome mas destacar qualquer aparição subsequente, use uma fórmula de "faixa expansiva":

=COUNTIF($A$2:A2, A2) > 1

=COUNTIF($A$2:A2, A2) > 1

Ao travar a primeira parte da faixa ($A$2) mas deixar a segunda parte relativa (A2), a fórmula verifica "de cima para baixo até minha linha atual." Esta é a melhor maneira de sinalizar duplicados para exclusão, deixando os dados originais intocados.

O Fluxo de Trabalho do Power Query

1. Selecione seus dados e vá para a aba Dados.

2. Clique em De Tabela/Faixa (isso transformará seus dados em uma Tabela oficial do Excel).

3. Uma vez que o Editor dePower Queryabrir, clique com o botão direito no cabeçalho da coluna que você deseja verificar.

4. Selecione Manter Duplicados (para ver apenas os erros) ou Remover Duplicados (para limpar a lista).

5. Clique em Fechar & Carregar para trazer os dados limpos de volta para uma nova planilha do Excel.

O Código da Macro

Para usar isto, pressione Alt + F11, vá para Inserir > Módulo, e cole:

Sub HighlightAllDuplicates()
    Dim myRange As Range
    Set myRange = Selection
    myRange.FormatConditions.AddUniqueValues
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Sub HighlightAllDuplicates()
    Dim myRange As Range
    Set myRange = Selection
    myRange.FormatConditions.AddUniqueValues
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Option Strict On



Sub HighlightAllDuplicates()
    Dim myRange As Range
    myRange = Selection
    myRange.FormatConditions.AddUniqueValues()
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority()
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Agora, você pode simplesmente selecionar uma faixa e executar esta macro para aplicar o destaque vermelho instantaneamente.

1. Espaços Invisíveis

O Excel vê "Maçã" e "Maçã " (com um espaço no final) como coisas completamente diferentes.

• Correção: Use a função =TRIM(A2) em uma coluna auxiliar para remover todos os espaços à esquerda e à direita antes de executar sua verificação de duplicados.

2. Números Armazenados como Texto

Se uma célula tem o número 123 e outra tem o texto '123', o Excel não os marcará como duplicados.

• Correção: Selecione a coluna, vá em Dados > Texto em Colunas, e clique em Concluir. Isso converte tudo naquela coluna para um formato consistente.

3. Espaços Não Quebráveis

Dados copiados de sites muitas vezes contêm um "espaço não quebrável" (ASCII 160) que a função TRIM não consegue remover.

• Correção: Use Localizar e Substituir (Ctrl + H). Na caixa "Localizar", segure Alt e digite 0160 no teclado numérico. Deixe a caixa "Substituir" vazia e clique em Substituir Tudo.

Por que Usar IronXL?

• Sem Interop: Evite as dores de cabeça do Microsoft.Office.Interop.
• Manipule Dados com Facilidade: Abra e edite facilmente Planilhas do Excel dentro de seus projetos, seja se você apenas precisar localizar células duplicadas e destacá-las, editar linhas inteiras, aplicar estilos de formatação, extrair valores únicos, ou apenas inserir novos dados.
• Velocidade: Processe planilhas massivas em milissegundos.
• Integração C#: Use a sintaxe LINQ familiar para encontrar e agrupar duplicados, mesmo que você precise destacar linhas duplicadas com base em múltiplos critérios.

Code Snippet: Finding Duplicate Entries in C

using IronXL;
using System.Linq;
// Load the workbook
WorkBook workbook = WorkBook.Load("financial_report.xlsx");
WorkSheet sheet = workbook.DefaultWorkSheet;
// Select the column to audit (e.g., Column B - Revenue)
var range = sheet["B2:B20"];
// Use LINQ to find the duplicate values
var duplicateList = range.GroupBy(c => c.Value.ToString())
                         .Where(g => g.Count() > 1)
                         .Select(g => g.Key);
// Apply styling to those duplicates
foreach (var cell in range)
{
    if (duplicateList.Contains(cell.Value.ToString()))
    {
        cell.Style.BackgroundColor = "#FFC7CE"; // Light Red fill
        cell.Style.Font.Color = "#9C0006";       // Dark Red text
    }
}
// Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx");

using IronXL;
using System.Linq;
// Load the workbook
WorkBook workbook = WorkBook.Load("financial_report.xlsx");
WorkSheet sheet = workbook.DefaultWorkSheet;
// Select the column to audit (e.g., Column B - Revenue)
var range = sheet["B2:B20"];
// Use LINQ to find the duplicate values
var duplicateList = range.GroupBy(c => c.Value.ToString())
                         .Where(g => g.Count() > 1)
                         .Select(g => g.Key);
// Apply styling to those duplicates
foreach (var cell in range)
{
    if (duplicateList.Contains(cell.Value.ToString()))
    {
        cell.Style.BackgroundColor = "#FFC7CE"; // Light Red fill
        cell.Style.Font.Color = "#9C0006";       // Dark Red text
    }
}
// Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx");

Imports IronXL
Imports System.Linq

' Load the workbook
Dim workbook As WorkBook = WorkBook.Load("financial_report.xlsx")
Dim sheet As WorkSheet = workbook.DefaultWorkSheet

' Select the column to audit (e.g., Column B - Revenue)
Dim range = sheet("B2:B20")

' Use LINQ to find the duplicate values
Dim duplicateList = range.GroupBy(Function(c) c.Value.ToString()) _
                         .Where(Function(g) g.Count() > 1) _
                         .Select(Function(g) g.Key)

' Apply styling to those duplicates
For Each cell In range
    If duplicateList.Contains(cell.Value.ToString()) Then
        cell.Style.BackgroundColor = "#FFC7CE" ' Light Red fill
        cell.Style.Font.Color = "#9C0006"       ' Dark Red text
    End If
Next

' Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx")

Comparação de Métodos