使用VBA删除重复 - Excel 2003

我想知道是否有人会知道任何VBA代码将摆脱重复。例如，在D列中，我想保留ID的第一个实例，并删除重复的（s）。使用VBA删除重复 - Excel 2003

enter image description here

问候

格雷格

来源

2012-04-18 Greg_C

可以插入TABEL的图片，怎么样锁定Id'd？ – Moosli 2012-04-18 06:59:41

如果在一行的开头插入4个空格，整行将以固定大小的字体显示。然后，您可以将行隔开以创建列。我假设上面的字符串是为了成为一个之前的图像。请提供后图，以便人们能够理解你所寻求的。 – 2012-04-18 07:23:35

好吧，这应该为你工作。，常规delets所有双在列C

Option Explicit 


Sub DeletDuplicate() 
    Dim x As Long 
    Dim LastRow As Long 
    LastRow = Range("C65536").End(xlUp).Row 
    For x = LastRow To 1 Step -1 
     If Application.WorksheetFunction.CountIf(Range("C1:C" & x), Range("C" & x).Text) > 1 Then 
      Range("C" & x).EntireRow.Delete 
     End If 
    Next x 
End Sub

来源

2012-04-18 09:00:15 Moosli

使用VBA删除重复 - Excel 2003

回答

相关问题