你好!根据楼主的意思,其实可以使用VBA程序进行处理,方便快捷。看不到楼主给出的行标号和列标号,也就大致给出如下示例:
一、VBA程序代码如下:(可以根据实际需要自行修改)
Sub Delete_C()Dim i, j, kOn Error Resume NextSet MySheet1 = ThisWorkbook.Worksheets("Sheet1") '定义工作表Sheet1For i = 5 To 1 Step -1 '从第5列到第1列 For j = 1 To 1000 '从第1行到1000行 If MySheet1.Cells(j, i) <> "" Then k = Application.WorksheetFunction.CountIf(MySheet1.Range("A1:E28"), MySheet1.Cells(j, i)) '查看A1:E28里面存在重复的个数 If k > 1 Then '如果存在重复 MySheet1.Cells(j, i) = "" '重复的单元格置空 End If End If NextNextEnd Sub
二、VBA程序运行之后的结果如下: