- 488
- 0
- 约小于1千字
- 约 2页
- 2023-04-13 发布于浙江
- 举报
excel去重保留最后一条数据
在Excel中,我们可以使用“高级筛选”或者“删除重复值”功能来实现去重操作。但是这些方法都只能保留第一条数据,如果我们需要保留最后一条数据怎么办呢?以下是一些参考内容:1. 使用公式可以使用函数组合实现去重并保留最后一条数据,例如:=IF(COUNTIF($A$2:$A2,A2)1,,B2)这个公式通过判断当前行的数据是否和前面的行重复,如果重复则清空当前行的值,否则保留当前行的值。这样就可以只保留每个重复数据的最后一条了。2. 使用宏通过编写宏来实现去重并保留最后一条数据也是一种方法。以下是一段实现示例:Sub DeleteDuplicate()Dim LastRow As LongDim i As LongDim j As LongDim k As LongDim Duplicate As BooleanLastRow = Range(A Rows.Count).End(xlUp).Row 获取数据最后一行For i = LastRow To 2 Step -1 倒序遍历数据 Duplicate = False 初始化是否重复的标志 For j = i - 1 To 1 Step -1 在当前行之前的数据中查找是否有重复 If Range(A i).Value = Range(A j).Value Then Duplicate = True 如果找到重复,则标记为True Exit For 退出查找 End If Next j If Duplicate Then 如果当前行有重复,则删除 Range(A i).EntireRow.Delete End IfNext iEnd Sub这个宏遍历了数据中每一行的值,从最后一行开始倒序遍历。在每一行之前的数据中查找是否有和当前行重复的数据,如果有则删除当前行。这样最后只保留了每个重复数据的最后一条。这两种方法都可以实现去重并保留最后一条数据的操作,具体选哪一种方法可以根据实际情况来决定。
原创力文档

文档评论(0)